《Access_2002数据库应用实训教程》第10章：Access_VBA程序设计讲解.ppt

第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.从数据库窗口“对象”列表中的“报表”对象中选择要操作的报表 名，如图10.9所示；;;;;;;;10.1.2 编写函数和子过程 ;;2.创建函数与子过程 子过程和函数是指那些不与特定的对象或事件绑定的过程。 （1）在代码模块中创建子过程和函数 操作步骤如下： A.在“数据库”窗口的对象栏中单击“模块”。 B.单击工具栏的“新建”按钮创建新的模块，或者选择一个 现有的模块并单击“设计”按钮，打开VBE窗口。 C.选择“插入”“过程”命令，或单击工具栏上的“插入模块” 按钮的下拉列表三角形，然后选择下拉菜单中的“过程”命令，打 开“添加过程”对话框，如图10.13所示。 ;;;;;10.1.3将宏转换成模块;回到数据库窗口，单击“模块”对象按钮，在“模块”对 象集合中会找到“被转换的宏 — 系统控制窗体宏组”这样 的模块，如图10.17所示。 方法二：在数据库设计视图宏对象集合中选中“系统控制 窗体宏组”，在窗口菜单栏上依次单击“工具” →“宏” →“将宏转换为Visual Basic代码”命令，随即弹出“转换宏” 对话框，如图10.18所示。根据需要在这个对话框中完成两个选项 的选定操作后，单击“转换”按钮可将宏对象“系统控制窗体宏组” 转换成为一个名为“系统控制窗体宏组 的副本”的模块对象。 ;;;;10.1.4 VBA代码的测试;;;VBA程序设计有几种控制结构：选择控制结构、循环控制结构。 选择控制结构有条件结构和选择结构两种。 （1）条件结构：只要执行一个语句，则可以使用条件结构。 语法如下：if 条件表达式 then 语句1 [else 语句2] （2）选择结构：在多个语句块中有选择地执行其中的一个。 语法如下： Select case 表达式 case 表达式值列表1 语句1 case 表达式值列表2 语句2 …… [case else 语句n] End select;;; ; ;;;10.2.2对窗体中控件对象编程;;;10.2.3 编程创建消息框;;;;;