第8章模块与VBA编程基础..docVIP

第8章 模块与VBA编程基础 一、模块的基本概念 模块是将VBA声明和过程作为一个单元进行保存的集合。 类模块 窗体和报表都是类模块，它们从属于各自的窗体或报表。通过单击窗体或报表设计视图中工具栏上的“代码”命令，可进行类模块的编辑窗口。 标准模块 包含通用过程和常用过程，以.bas扩展名保存文件，缺省时应用程序中不包含标准模块，模块中对象的声明在缺省时是公有的。 将宏转换为模块 在Access系统中，可以将设计好的宏对象转换为模块代码形式。其操作方法是：右击指定宏，选择快捷菜单中“另存为”命令，将其另存为模块类型即可。 二、创建模块 过程是模块的单元组成，过程分为两种：Sub子过程和Function函数过程。 在模块中加入过程 （1）子过程 定义格式 Sub 过程名([参数表]) ［程序代码］ End Sub 说明 可在过程中放置Exit Sub语句，强行退出过程 过程的定义是平行，不能嵌套定义过程。 过程结束标志为End Sub 调用Sub过程 格式1： Call 过程名[(实参表)] 当过程没带参数时，缺省实参表。否则带相应个数的实参，并参数间用逗号分隔。 格式2： 过程名 [实参表] 当带参数时，则实参表不能用括号。 （2）函数过程 定义格式 Function 函数名([参数列表]) [As 类型] 程序代码 函数名 = 返回值 End Function 说明 以Function开头，并以End Function结束。 函数中可用Exit Function语句强行退出。 类型选项表示该函数需要返回的数据类型，缺省时为Variant型。 调用函数 与VB内部函数的调用相同，不能用Call调用。 在模块中执行宏 在模块中使用以下方式调用宏： Docmd.RunMacro “宏名”［，Rcount］［，Rexp］ Rcount用于计算宏运行次数，Rexp条件表达式，当结果为False时停止运行宏。 三、VBA程序设计基础 面向对象程序设计的基本概念 （1）对象是类的一个实例，每个对象都有自己的特征和行为。 （2）对象的属性：指对象的特征，用数据来表示。 （3）对象的方法：指对象的行为，用对象中的代码来实现。 （4）事件：指对象可以识别和相应预定义的动作。 （5）类：描述对象的特征以及对象外观和行为的模板。其特征主要包括：封装性、继承性、多态性、抽象性。 Visual Basic编辑环境 （1）启动VB编辑器方法 方法1：通过各对象属性对话框中事件标签方式启动。 方法2：通过模块对象列表中的“新建”按钮启动。 方法3：通过主菜单“工具\宏\Visual Basic编辑器”命令或Alt+F11快捷键启动。 （2）VBA编辑器界面 标准工具栏：认识常用的命令按钮。 工程窗口：即资源管理器窗口，管理应用程序的所有模块文件。 代码窗口：有对象和事件下拉列表框、代码编辑区以及模块查看切换按钮组。 属性窗口：用于罗列指定对象的所有属性。 立即窗口：用于表达式计算和对象值的显示，主要用在程序调试时。 （3）程序语句书写规则 多条语句写在同一行上时，语句间用冒号作分隔符 将一条语句写在多行上时，此时可用续行符“_”。 添加注释：用单引号“‘”或Rem语句作为注释内容的开始。 数据类型与数据库对象 （1）标准数据类型 数据类型 类型标识 类型说明符 取值范围 整型 Integer % -32768～32767 长整型 Long 单精度 Single ! 双精度 Double # 货币 Currency @ 字符串 String $ 0～65500 布尔型 Boolean 无 True或 False 日期型 Date 无 100/1/1～9999/12/31 变体型 Variant 无 布尔型数据：其取值为True或False，True值存储为-1，False值存储为0。 日期型数据：其常量表示时以#号为定界符，如#2001-1-1# 变体型数据：可以包含除定长字符串与用户自定义类型外的任何数据类型。 （2）用户自定义类型 定义格式： Type [数据类型名] 成员名1 as 数据类型 成员名2 as 数据类型 。。。。。。。。。。。 End Type 如： Type Stud ‘定义数据类型 No as intger Name as string*8 Sex as string*1 Score as singe End type Dim st a