第四章 access,VBA.ppt

Access程序设计 总 目 录 第1章 数据库基础 第2章 数据库和表 第3章 查询 第4章 窗体 第5章 报表 第6章 宏 第7章 页 第8章 模块与VBA程序设计 第9章 二级公共基础知识 第8章 模块与VBA程序设计 【难重点】 类模块及控件对象的代码表示 运算符与表达式 选择结构的程序设计 常用系统函数 知识网络图 8.1 初识VBA编 【例8.1】用户登录窗体中“退出”按钮VBA代码 (1)查看“退出”命令按钮事件 (2)查看事件代码 8.1 初识VBA编 说明 ①事件过程 Private Sub Command7_Click() ….. End Sub Sub表示定义一个过程。 End Sub表示该过程的结尾处。 Command7_Click()表示过程名称，在access中，过程名为：控件名称_事件名称()，过程名后必须有一个( )。Command7为“退出”按钮的名称，Click为单击事件。 ②事件过程代码 在Private Sub Command7_Click()和End Sub中间的几行代码为实现“退出”功能的VBA代码，实现退出的具体代码为DoCmd.Quit，其他代码用于错误处理。这些代码将在稍后详细介绍其作用。 8.1 初识VBA编 8.1.1 窗体事件 事件(event)：是发生在控件对象上且可以辨认的动作，如像单击鼠标或按下某键等，并且可以写某些代码来响应此述动作。 对事件的响应一般有两种方法，一种方法是使用宏来响应控件对象事件，另一种方法是编写VBA代码过程。 8.1 初识VBA编 【例8.2】如果使用宏来响应控件对象事件，比如同样创建一个可退出access程序的按钮，可采用以下步骤： （1）创建一个宏，宏名为“退出系统”，操作选择“Quit”。 （2）创建一个窗体。在窗体上添加一个命令按钮 . （3）打开命令按钮属性窗口，切换到“事件”选项页，单击其单击事件下拉框，在弹出的列表中选择“退出系统”宏，如图8.6 VBA编程环境（VBE） 进入VBE可以选择以下几种方式： （1）将某个对象的某个事件设为[事件过程]，如图8.4所示，单击右侧的“…”。 （2）在窗体或报表的【设计视图】中单击工具栏上的【代码】按钮。 （3）在数据库窗口中，单击菜单【工具】|【宏】|【Visual Basic编辑器】命令。 （4）选择数据库模块对象，单击数据库窗口中【新建】或者双击其中一个已经存在的模块对象 模块 模块是由VBA语言编写的程序的集合。 模块分类 1、类模块：和某窗体或报表相关联 2、标准模块：独立于窗体和报表 将宏转化为模块 宏的每个操作都有对应的VBA语句，因此可以将宏转化为模块，加快运行速度。 创建模块 类模块： 对某个控件编写事件代码时就自动建立了 标准模块 ： 1、在数据库窗口或VBE窗口，执行菜单【插入】|【模块】命令。 2、在数据库窗口，单击【模块】对象，然后单击【新建】按钮。 VBA编程基础 1、注释 格式1： rem 注释内容 格式2： 注释内容 说明：“ ”为英文符号单引号 2、连写 如果要在同一行上书写多条语句，需要使用“:”号分隔不同的语句。 3、换行 一条语句太长，可以将该语句写成几行，在换行处加空白加下划线 ( _ ) 。 数据类型 变量 声明变量 格式：dim 变量名 [as数据类型] 说明：如果有as 数据类型选项，该变量只能储存该类型的值，否则可以是任何类型。 如： Dim userid as string Dim x as integer , y as integer Dim i 说明：第二条语句同时声明了两个变量；i为变体类型，可以储存任何类型数据。 变量赋值 userid=11080 X=1 改变变量的值 X=x+1 说明：将x的值增加1 常量 在VBA中需要反复使用的常数，为了便于记忆和维护，可以采用一个名字来表示即常量。 格式：[Public | Private] Const 常量名 [as 数据类型] = 值 说明： public只能用在标准模块中，表示该常量可以在所有模块中使用。 Private该常量只能声明它的模块中使用。 如： Public Const fine =0.1 说明：在标准模块中声明后，所有模块中都可以使用pi常量。 数组 1、声明数组 格式：Dim 数组名(n) as 数据类型 Dim 数组名([m to] n) as 数据类型 n是数组的下标上界，m是数组的下标下界，m可以省略，如省略表示0，数组共有n-m+1个元素。 举例 Dim a(2 to 5) as integer 说明：共有数组 a(2)