Access管理系统应用实例 - 图文

图74

⑶．“罚款窗体”主要设计视图：（如图75~图77）

图75 “罚款窗体”设计视图

图76 “罚款子窗体”设计视图

其中“确定”命令按钮的代码为：Private Sub Command19_Click()

Me.罚款子窗体.Requery End Sub

“缴纳”命令按钮的“单击”事件为调用宏“罚款缴纳宏”，见图77。

图77

⑷．“图书查询窗体”主要设计视图：（如图78~图79）

图78 “图书查询窗体”设计视图

图79 “图书查询窗体子窗体”设计视图

其中“确定”命令按钮的代码为：Private Sub Command5_Click()

Me.图书查询窗体子窗体.Form.RecordSource = \* from 图书表 where \+ Combo1 + \+

Text3 + \End Sub

⑸．“会员查询窗体”主要设计视图：（如图80~图81）

图80 “会员查询窗体”设计视图