《Access 2002数据库应用实训教程》第10章：Access VBA程序设计.pptVIP

第10章 Access VBA程序设计;10.1 模块的创建;;;;;;;;;;5.在代码窗口中出现的标准过程格式中添加要实现的代码。 代码如下： Private Sub Command3_Click() On Error GoTo Err_Command3_Click Dim stDocName As String Dim stLinkCriteria As String stDocName = 商品进货数据录入 DoCmd.OpenForm stDocName, , , stLinkCriteria Exit_Command3_Click: Exit Sub Err_Command3_Click: MsgBox Err.Description Resume Exit_Command3_Click End Sub;;;创建完窗体类模块以后，可以回到如图10.8所示的“ 系统控制窗体”窗体视图来单击各个按钮，查看是否运行。 操作二 报表类模块创建的步骤如下： 此例为“商品库存情况”的报表运行时，根据库存量来显示或隐 藏一个提示消息。当商品“库存量”小于10时，将有一个标签在打印 此节时显示消息“库存量不足，请速进货！”， 当商品“库存量”大 于10时，此标签将被隐藏。 1.从数据库窗口“对象”列表???的“报表”对象中选择要操作的报表 名，如图