Access数据库技术与应用 教学课件 作者 史国川 黄剑ch11.ppt

《Access数据库技术与应用 教学课件 作者 史国川 黄剑ch11.ppt》由会员上传分享，免费在线阅读，更多相关内容在教育资源-天天文库。

1、Access数据库技术与应用Access数据库技术与应用第十一章创建VBA模块本章要点1、变量与过程的作用域2、模块程序的结构设计与常用命令的使用3、用VBA设计事件过程4、网络数据库编程方法编程环境的模块代码设计窗口由两部分区域组成：声明区域过程实现区域。●声明区域位于模块的开始部分，主要用于声明比较规则，变量、常量或数组等的定义等。●过程实现区域用于设计每个具体的子过程或函数过程，在子过程或函数过程内部编写VBA代码，用以执行操作或计算数值。11.1模块创建变量或过程可被访问的范围称为变量或过程的作用域。11.1.1过程与变量的作用域1

2、.过程的作用域过程的作用域分为：模块(窗体模块或标准模块)级和全局级。●模块(窗体模块或标准模块)级：过程定义在某个窗体模块或标准模块内部，子过程或函数过程前加Private关键字，这类过程只能被本窗体模块或标准模块内部的其他过程调用。●全局级：过程定义在某个标准模块内部，子过程或函数过程前加Public关键字，这类过程可以被应用程序的所有窗体模块或标准模块中的过程调用。11.1.1过程与变量的作用域调用方式：在标准模块中定义的全局过程，外部过程均可调用，如果过程名在整个应用程序中不惟一，需在被调过程名前加该过程所在的标准模块名。例：Cal

3、l标准模块名.被调过程名(实参表)2.变量的作用域变量定义的位置与方式不同，变量的作用范围也有所不同，变量的作用范围分为：局部范围、模块范围和全局范围。根据变量的作用范围，可把变量分为3种类型：局部变量、模块变量和全局变量。11.1.1过程与变量的作用域(1)模块声明区域此区域在每一模块的最上方，第一个过程之上，行数可多可少。在模块声明区域可以声明比较规则、声明变量等。OptionCompareDatabase语句用于声明比较规则，关于Option的使用语法有：●OptionCompare：定义模块字符串比较规则●OptionBase：设置

4、该模块所有数组的起始值，其后只可使用0和1两个数字。●OptionExplicit：该语句用于关闭系统自动声明变量的功能。11.1.1过程与变量的作用域(2)局部变量变量定义在模块的子过程或函数过程内部，使用Dim…As语句定义或不加定义直接使用的变量。其作用范围仅在本子过程中，别的过程不能访问，一旦该子过程运行结束，局部变量的内容自动消失。(3)模块变量变量定义在模块的所有子过程或函数过程的外部，在模块的声明区域(开始位置)，使用Dim…As语句定义或用Private…As语句声明的变量。其作用范围为本模块的所有子过程或函数过程。别的模块

5、过程不能访问，一旦模块运行结束，模块变量的内容自动消失。11.1.1过程与变量的作用域(4)全局变量变量定义在标准模块的所有子过程或函数过程的外部，在标准模块的声明区域(开始位置)使用Public…As语句声明的变量。其作用范围为应用程序所有模块的子过程或函数过程。全局变量的值在整个应用程序的运行中始终存在，只有整个应用程序运行结束，全局变量的值才会消失。11.1.1过程与变量的作用域当为窗体、报表或控件建立事件过程时，Access2003将自动创建事件过程的模板，编程人员只需要向窗体、报表或控件的事件过程模板中添加需要执行的程序代码即可。

6、11.1.2创建事件过程1.创建操作记录的命令按钮【例11.1】建立“学生信息处理”窗体，运行结果如图：11.1.2创建事件过程2.创建系统登录窗体“确定”按钮的事件过程设计一个应用系统，登录窗体是不可缺少的。在登录窗体中，主要验证用户输入的密码和用户名是否合法，正确则运行应用系统，否则，拒绝进入。11.1.2创建事件过程【例11.2】设计一个用户登录窗体。11.1.2创建事件过程3.在VBA编程中验证数据设计与数据表关联的窗体，在操作窗体中，每当保存记录数据时，所做的更改便会保存到数据表中。对一些关键字段，例如学号，可在数据被更新前，验证

7、并提示数据的合法性。11.1.2创建事件过程在控件的数据被更新之前会发生BeforeUpdate事件。输入或改变了控件的值后，一但该控件失去焦点，就激发BeforeUpdate事件。通过创建控件的BeforeUpdate事件过程，可以实现对输入数据的各种验证，例如数据类型、数据范围验证等。11.1.2创建事件过程【例11.3】对在“学生信息处理”窗体的学号文本框控件(txtxh)中输入或更改数据进行验证。要求学号文本框只接受数值数据且位数为8位，当更改或输入不合法数据时提示用户。11.1.2创建事件过程4.在VBA编程中设计计时器在VBA中

8、没有提供直接的时钟控件(例如VB中的Timer)，但在窗体中提供了“计时器间隔”(TimerInterval)属性和“计时器触发”(Timer)事件。Timer事件以属性Time