搜索
领航教育在线（）二级access讲义18.3.2VBA编程环境一、VisualBasic编辑器（详见书本P202）VisualBasic编辑器VBE（VisualBasicEditor）是编辑VBA代码时使用的界面。VBE窗口主要由标准工具栏、工具窗口、属性窗口、代码窗口和立即窗口等组成。二、进入VBA编程环境Access模块分成类模块和标准模块两种。对于类模块，可以直接定位到窗体或报表，然后单击工具栏上的“代码”按钮进入；或定位到窗体、报表和控件上通过指定对象事件处理过程进入。其方法有两种：（1）右键单击控件对象，单击快捷菜单上的“事件生成器命令”，打开“事件生成器”对话框，选择其中的“代码生成器”，单击“确定”按钮即可进入；（2）单击属性窗口的“事件”选项卡，选中某个事件直接单击属性右侧的“…”按钮，打开“事件生成器”对话框，选择其中的“代码生成器”，单击“确定”按钮即可进入。对于标准模块，有3种方法进入：（1）对于已存在的标准模块，只需从数据库窗体对象列表上选择“模块”，双击要查看的模块对象即可进入；（2）要创建新的标准模块，需要从数据库窗体对象列表上选择“模块”，单击工具栏上的“新建”按钮即可进入；（3）在数据库对象窗体中，选择“工具”菜单里“宏”子菜单的“VisualBasic编辑器”选项即可进入。三、VBE环境中编写VBA代码VBA代码是由语句组成的，一条语句就是一行代码。例如intCount=3’将3赋值给变量intCountDebug.PrintintCount’在立即窗口打印变量intCount的值3Access的VBE编辑环境提供了完整的开发和调试工具。其中的代码窗口顶部包含两个组合框，左侧为对象列表，右侧为过程列表。操作时，从左侧组合框选定一个对象后，右侧过程组合框中会列出该对象的所有事件过程，再从该对象过程列表选项中选择某个事件名称，系统会自动生成相应的事件过程模块，用户添加代码即可。双击工程窗口中的任何类或对象都可以在代码窗口中打开相应代码进行编辑处理。四、程序语句书写原则（详见书本P206）8.3.3数据类型和数据库对象一、标准数据类型（1）布尔型数据布尔型数据只有两个值True或False。布尔型数据转换为其他类型数据时，Ture转换为-1，False转换为0；其他类型数据转换为布尔型数据时，0转换为False，其他类型转换为Ture。（2）日期型数据“日期/时间”类型数据必须前后用“#”号封住。如#2007-1-1#、#2002-5-414:30:00PM#。（3）变体类型数据变体类型数据是特殊的数据类型。VBA中规定，如果没有显示声明或使用符号来定义变量的数据类型，则默认为变体类型。二、用户定义的数据类型（详见书本P208）应用过程中可以建立包含一个或多个VBA标准数据类型的数据类型，这就是用户定义数据类型。它不仅包含VBA的标准数据类型，还包含其他用户定义的数据类型。领航教育在线（）二级access讲义2用户定义数据类型可以在Type...EndType关键字间定义，定义格式如下：Type[数据类型名]＜域名＞As＜数据类型＞＜域名＞As＜数据类型＞…EndType三、数据库对象（详见书本P208）8.3.4变量与常量变量是程序运行过程中值会发生变化的数据。如同一间旅馆客房，昨天可住旅客A，今天住旅客B，明天又有可能被闲置。变量的命名规则如下：（1）以字母或汉字开头，后可跟字母、数字或下划线。（2）变量名最长为255个字符。（3）不区分变量名的大小写，不能使用关键字。（4）字符之间必须并排书写，不能出现上下标。以下是合法的变量名：a，x，x3，BOOK_1，sum5以下是非法的变量名：3ss*T-3xbowy-1if常量是在程序中可以直接引用的实际值，其值在程序运行过程中不变。在VBA中，常量可以分为3种：直接常量、符号常量和系统常量一、变量的声明VBA变量声明有两种方法。1、显式声明VBA中定义变量的格式为：Dim变量名[AS类型]格式中Dim是一个VBA命令，此处用于定义变量；As是关键字，此处用于指定变量的数据类型。例如：DimbAgeasInteger’bAge为整型变量2、隐含声明VBA允许用户在编写应用程序时，不声明变量而直接使用，这就是隐式声明。所有隐式声明的变量都是Variant数据类型。例如：Dimm,n,’m，n为变体Variant变量NewVar=528’NewVar为Variant类型变量，其值为258。二、强制声明在默认情况下，VBA允许在代码中使用未声明的变量，如果在模块设计窗口的顶部“通用—声明”区域中，加入语句：OptionExplicit强制要求所有变量必须定义才能使用。这种方法只能为当前模块设置了自动变量声明功能，如果想为所有模块都启用此功能，可以单击菜单命令“工具”下“选项”对话框中，选中“要求变量声明”选项即可。三．变量的作用域（1）局部范围（Local）变量定义在模块的过程内部，过程代码执行时才可见。在子过程或函数过程中定义的或直接使用的变量作用范围都是局部的。在子过程或函数内部使用Dim、Static…As关键字说明领航教育在线（）二级access讲义3的变量就是局部范围的。（2）模块范围（Module）变量定义在模块的所有过程之外的起始位置，运行时在模块所包含的所有子过程或函数过程中可见。在模块的通用说明区，用Dim、Static、Private…As关键字定义的变量作用域都是模块范围。（3）全局范围（Public）变量定义在标准模块的所有过程之外的起始位置，运行时在类模块和标准模块的所有子过程或函数过程中都可见。在标准模块的变量定义区域，用Public…As关键字说明的变量就属于全局的范围。变量的持续时间（生命周期）是从变量定义语句所在的过程第一次运行，到程序代码执行完毕并将控制权交回调用它的过程为止的时间。四．数据库对象变量Access建立的数据库对象及其属性，均可被看成是VBA程序代码中的变量及其指定的值来加以引用。例如，Access中窗体和报表对象的引用格式为：Forms！窗体名称！控件名称[.属性名称]或Reports！报表名称！控件名称[.属性名称]关键字Forms或Reports分别表示窗体或报表对象集合。感叹号“!”分隔开对象名称和控件名称。“属性名称”部分缺省，则为控件基本属性。如果对象名称中含有空格或标点符号，就要用方括号把名称括起来。五．数组数组是在有规则的结构中包含一种数据类型的一组数据，也称作数组元素变量。数组变量由变量名和数组下标构成，使用数组必须先定义数组。通常用Dim语句来定义数组，定义格式为：Dim数组名([下标下限to]下标上限)[As数据类型]缺省情况下，下标下限为0，数组元素从“数组名(0)”至“数组名(下标上限)”；如果使用to选项，则可以安排非0下限。例如，dimscore（10）asInteger定义了11个整形数构成的数组，数组元素为score(0)至score(10)再如，dimscore（1to10）asInteger定义了10个元素的整型数组，数组元素为score(1)至score(10)注：（1）所有数组元素在内存连续存放（2）根据下标区分数组元素关于数组的定义，还有下面的几点说明：（1）定义数组时数组名的命名规则与变量名的命名规则相同。（2）一般在定义数组时应给出数组的上界和下界。但也可以省略下界，下界缺省为0。例如，Dima（10）AsSingle默认情况下，数组a由11个元素组成。若希望下标从1开始，可在模块的通用声明段使用OptionBase语句声明。其使用格式为OptionBase0|1'后面的参数只能取0或1（3）下界和上界不能使用变量，必须是常量，常量可以是字面常量或符号常量，一般是整型常量。（4）如果省略As子句，则数组的类型为Varient变体类型。二维数组的定义格式为：领航教育在线（）二级access讲义4Dim数组名([下界to]上界，[下界to]上界)[As数据类型]例如，Dimc（1To3,1To4）AsSinglec（1，1）c（1，2）c（1，3）c（1，4）c（2，1）c（2，2）c（2，3）c（2，4）c（3，1）c（3，2）c（3，3）c（3，4）六、变量标识命名法规在编写VBA程序代码时，会用到大量的变量名称和不同的数据类型。对于控件对象，可以用VBA的Set关键字将每个命名的控件对象指定为一个变量名称。目前，VB和VBA均推荐使用Hungarian符号法作为命名法则。该方法也被广泛用在C和C++等一些程序中。Hungarian符号法使用一组代表数据类型的码。用小写字母作为变量名的前缀。七．符号常量如果程序中多处用到某个常量，将其定义成符号常量可增加代码的可读性，也便于维护。符号常量用关键字Const来定义，格式如下：Const符号常量名称=常量值例如：ConstPIassingle=3.1415926定义了一个符号常量PI，其值为3.1415926若是在模块的声明区中定义符号常量，则建立一个所有模块都可以用的全局符号常量。一般是Const前加Global或Public关键字。八．系统常量这是一类特殊的符号常量，Access系统内部包含若干个启动时就建立的系统常量，有True、False、Yes、No、On、Off和Null等。在编码时可以直接使用。例如：VBA类库中，vbRed代表红色，vbBlue代表蓝色。这里开始的两个字母表示所在的类库Access类库的常量以ac开始，如acForm等。ADO类库的常量以ad开始，如adOpenKeyset。8.3.5常用标准函数（本节请详见书本P213）在VBA中，除在模块创建中可以定义子过程与函数过程完成特定功能外，又提供了近百个内置的标准函数，可以方便完成许多操作。标准函数一般用于表达式中，有的能和语句一样使用。其使用形式如下：函数名(＜参数1＞＜，参数2＞[，参数3][，参数4][，参数5]…)其中，函数名必不可少，函数的参数放在函数名后的圆括号中，参数可以是常量、变量或表达式，可以有一个或多个，少数函数为无参函数。8.3.6运算符和表达式（详见书本P219）在VBA编程语言中，提供了许多运算符来完成各种形式的运算和处理。根据运算不同，可以分成4种类型的运算符：算术运算符、关系运算符、逻辑运算符和连接运算符。8.4VBA流程控制语句一个语句是能够完成某项操作的一条命令。VBA程序的功能就是由大量的语句串命令构成。VBA程序语句按照其功能不同分成两大类型：(1)声明语句，用于给变量、常量或过程定义命名；(2)执行语句，用于执行赋值操作，调用过程，实现各种流程控制。执行语句分为3种结构：(1)顺序结构，按照语句顺序顺次执行。领航教育在线（）二级access讲义5(2)条件结构，又称为选择结构，根据条件选择执行路径。(3)循环结构，重复执行某一段程序语句。8.4.1赋值语句赋值语句是最基本的语句。它的功能是给变量或对象的属性赋值。其格式为变量名＝表达式或对象名.属性＝表达式例如：Rate=0.1‘给变量Rate赋值0.1Me!Text1.Value=“欢迎来到领航教育“给控件的属性赋值8.4.2条件语句1．If…Then语句例如：语句格式为If表达式Then语句块1EndIf‘输入一个数并在立即窗口输出其值DimxAsIntegerx=InputBox(请输入x的值:)IfxThenDebug.PrintxEndIf2．If…Then…Else语句语句格式为If表达式Then语句块1Else语句块2EndIf说明：（1）表达式可以是任何表达式，一般为关系表达式或布尔表达式。如果是其他表达式，则非0认为是True，0认为是Fal