《Access数据库技术及应用(第二版) 教学课件 ppt 作者 吕英华 第7章 模块与VBA程序设计》由会员分享，可在线阅读，更多相关《Access数据库技术及应用(第二版) 教学课件 ppt 作者 吕英华 第7章 模块与VBA程序设计（28页珍藏版）》请在金锄头文库上搜索。
1、本章重点讲解窗体模块与标准模块，以及面向过程的程序设计与面向对象的程序设计的思想、技术和方法。,Access数据库技术及应用（第二版）,7.1 模块的基本概念,7.1.1 窗体模块 顾名思义，窗体模块是与窗体和控件相联系的。回顾一下例4.16的主要步骤： 1）建立一个可视化的用户界面，即由窗体与控件组成。 2）编写窗体与控件的事件过程。 代码区的事件过程：每一行是有特定含义的符号序列，称为一个语句。一般是一行一条语句，也可以是用英文冒号间隔的几条语句。解决一个问题的语句集合，即“符号化语句序列” 就叫做程序，而编制程序的过程就称为程序设计。 由此例可知，窗体模块的主体是为响应事件而编写的程序。
2、 7.1.2 标准模块 创建标准模块的方法很简单：在数据库窗口，选择“创建”选项卡，单击“宏与代码”组的“模块”按钮，则打开VBE窗口。 向标准模块添加过程的步骤也很简单：选择“插入”菜单的“过程”命令，打开“添加过程”对话框。在“名称”文本框输入过程名（如Sum0），单击“确定”按钮，则在代码区自动生成命名的过程头行与尾行，然后在两行之间书写程序语句。 可见，模块是将VBA的声明和过程作为一个单元进行存储的集合体。,7.2 VBA编程基础,7.2.1 常量与变量 常量和变量是数据的两种基本表现形式，它们是程序处理的对象。在程序执行过程中，其值不允许改变的数据叫做常量，而其值可以改变的数据叫做
3、变量。 1常量 VBA程序中允许使用5种类型的常量： 1) 数值常量 分为整型常量和实型常量（包括小数形式与指数形式）。 2) 字符串常量 3) 日期常量 4) 符号常量，指用户自己定义的常量，其格式为： Const 符号常量名 = 常量值 5) 系统常量，指由Access系统定义的符号常量。 在程序中，常量可以直接使用。,2变量 1) 变量的本质含义 变量表示内存的存储单元，即由一个或几个连续字节组成的区域。在程序中，使用变量名对其值进行操作向存储单元中存入数据，或从存储单元中取出数据。 2) 变量名 由字母、汉字、数字和下划线组成的字符序列，但不能以数字和下划线开头。变量名长度不能超过25
4、5个字符，不能使用系统定义的保留字（即有特殊含义的单词）作变量名。变量名中的字母大小写不加区分。 3) 定义变量的方法 使用Dim定义变量，一般格式是： Dim 变量名表列 As 类型名 或 Dim 变量名类型符 使用类型符定义变量，一般格式是： 变量名类型符 = 值 定义变体类型变量 使用类型名Variant定义变量，或者定义时缺少“As 类型名”或“类型符”，则为变体类型变量。,3数组 所谓数组，是指多个同类型变量的集合，其中的每个变量叫做数组元素。 1) 一维数组 一维数组用来描述一行数据或一列数据，如一个学生的20科成绩，50个学生的单科成绩。 一维数组的定义格式为： Dim 数组名(
5、下界 to 上界) As 类型名 或 Dim 数组名类型符(下界 to 上界) 如何区分数组元素呢？使用带下标（即序号）的数组名。 2) 二维数组 二维数组用来描述由多行多列组成的二维表上的数据，如一个班级的学生成绩表、课程表、一个单位的工资表、数学上的行列式与矩阵等。 二维数组的定义格式为： Dim 数组名(下界 to 上界,下界 to 上界) As 类型名 或 Dim 数组名类型符(下界 to 上界,下界 to 上界) 引用二维数组元素，要使用带行下标与列下标的数组名。 强调指出，数组在内存占有连续的存储空间。,7.2.2 运算符与表达式 1运算符 在VBA中，对数据进行操作是通过运算符来
6、实现的。共有5类运算符，按优先级由高到低依次是： 1) 算术运算符，8个。 2) 连接运算符，2个。 3) 关系运算符，6个。 4) 逻辑运算符，常用的3个。 5) 赋值运算符，同等号，但意义不同。 2表达式 用运算符将常量、变量、函数等连接起来的，符合VBA语法规则的式子称为表达式。求表达式值的关键是掌握运算符的运算级别（叫做优先级），如教材P212的表7.2所示。求值规则是： 圆括号是级别最高的运算符； 不同类的运算符之间，按表7.2指出的横向顺序由高到低进行计算； 同类运算符之间，要严格按表7.2指出的纵向顺序由高到低进行计算； 级别相同的运算符之间，则从左至右依次进行计算； 惟一例外的
7、是，指数运算符和负号运算符相邻时，负号优先。 注意“+”运算符的使用，可能是算术运算符，也可能是字符串连接运算符。,7.2.3 常用函数 函数是一种对应关系：对于自变量的一个值或一组值有唯一确定的函数值（常叫返回值）与它对应。函数能实现运算符难以完成的操作。 1数学函数 1) Abs(x)，求x的绝对值。 2) Int(x)，求不大于x的最大整数。 3) Sqr(x)，求x的平方根。 4) Round(x ,n)，按指定的小数位数n（省略为0）对x进行四舍五入。 5) Rnd()或Rnd，它产生大于等于0，但小于1的随机数。 2字符串函数 1) Tab(n)，从第n列开始输出数据，它与其后的数
8、据用分号间隔。 2) Space(n)，此函数产生n个空格，它与其后的数据用分号间隔。 3) InStr(s,t)，从主串s的第一个字符开始，查找子串t在s中首次出现的位置。 3转换函数 1) Val(s)，将数值字符串s转换成能计算的数值。 2) Str(x)，将数值x转换成字符串，正数前保留一个空格，负数前保留负号。,3) Asc(s)，将字符串s的首字符转换成对应的ASCII码值。 4) Chr(n)，将ASCII码值n转换成对应的字符。 5) CDate(s)，将日期字符串s转换成日期。 6) Nz(x)，当x是数字型且值为Null时，函数值为0；当x是字符串型且值为Null时，函数值
9、为空串（即“”）。 4输入/输出函数 1) InputBox(提示串,标题串)，等待用户输入文本数据。 2) MsgBox(输出项 ,按钮值,标题串) ，用来显示输出项的内容。 5条件函数 Iif(条件,表达式1,表达式2) 若条件成立，则取表达式1的值；否则，取表达式2的值。 6验证函数 1) IsNull(x)，检查表达式x的值是否为无效数据（Null）。 2) IsNumeric(x)，检查表达式x的值是否为数值。 使用函数的常用格式是： 变量 = 函数名(值表列) 。 此外，函数可以做表达式的一部分，或做另一个函数的自变量。,7.2.4 基本语句 VBA程序是由一个个语句组成的，每个语
10、句是完成某项功能或操作的一条命令。 1注释语句 一种是以单撇号开头的文字串，一种是以Rem开头的文字串。 2赋值语句，使用格式为： 变量名 = 操作数或表达式 语句的含义是，将赋值运算符（=）右侧的操作数或表达式的值存入到左侧变量所代表的存储单元中。 3输出语句 指在立即窗口中使用的Print（或?）命令，其一般格式为： Print | ? 表达式表列 4消息框语句 MsgBox 输出项 ,按钮值 ,标题串 这个语句用来输出数据，并等待用户单击按钮。“输出项”是必须的，可以是常量、变量、函数或字符串表达式。“标题串”是可选的，用做消息框的标题，省略时则把“Microsoft Access”作为
11、标题。“按钮值”也是可选的，用来显示按钮的类型与数量，以及图标的样式。,7.3 选择结构程序设计,根据条件在两种或多种情况中选择其一的结构叫做选择结构。将选择结构应用到程序设计上就称为选择结构程序设计，它是通过条件语句来实现的。 7.3.1 条件语句 1基本格式 格式1. If 条件 Then 语句块1 Else 语句块2 End If 其中的语句块，可以是一个语句或几个语句的组合。这是两分支的选择结构，当条件成立时，执行语句块1；否则，即条件不成立时，执行语句块2。 格式2. If 条件 Then 语句块1 Else 语句块2 这是单行结构的条件语句基本格式，含义与格式1完全相同。要注意的是
12、，结尾部分没有End If语句。,2简化格式 去掉条件语句基本格式中的Else部分，则成为简化格式。 格式1. If 条件 Then 语句块 End If 格式2. If 条件 Then 语句块 这是单分支结构的条件语句，即只考虑条件成立时要执行的操作。 7.3.2 条件语句的嵌套 不管是条件语句的基本格式，还是简化格式，语句块本身也可以是条件语句，这叫做条件语句的嵌套。典型的是ElseIf格式，其特点是条件的“层层否定”。 ElseIf格式的一般形式为： If 条件1 Then 语句块1 条件1成立时，执行语句块1 ElseIf 条件2 Then 语句块2 条件2成立时，执行语句块2 Els
13、eIf 条件3 Then 语句块3 条件3成立时，执行语句块3 Else 语句块n+1 上面条件均不成立时，执行语句块n+1 End If 只有一个条件语句结束行,7.3.3 多分支选择语句 多分支选择语句的一般形式为： Select Case 测试表达式 Case 表达式1 语句块1 Case 表达式2 To 表达式3 语句块2 Case Is 关系运算符 表达式4 语句块3 Case Else 语句块n+1 End Select 此语句的功能是，根据“测试表达式”的值，从多个语句块中选择符合条件的一个语句块执行。执行过程是，首先计算“测试表达式”的值，然后依次与每个Case后的表达式值或条
14、件进行匹配。如果找到，则执行相应的语句块并退出；如果没有找到，则执行Case Else后的语句块n+1再退出。,7.4 循环结构程序设计,在一定条件下重复执行某操作的这种结构叫做循环结构。程序设计上，用循环语句来描述循环结构。其中，重复执行的操作叫做循环体。 7.4.1 ForNext语句 这个循环语句的一般格式为： For 变量 = 初值 To 终值 Step 步长 循环体 Next 变量 For语句的执行过程如下。 1) 将初值赋给变量。 2) 检查变量的值是否“超过”终值，如果其值没有“超过”终值，就执行一次循环体；接着，将“变量+步长”的值赋给变量。重复这个过程，直到变量的值“超过”终
15、值时停止循环，转而执行Next后面的语句。 这里所说的“超过”有两种含义，即大于或小于。当步长为正时，判断变量是否大于终值；当步长为负时，判断变量是否小于终值。 注意：若要提前退出For循环，可使用带条件的Exit For语句。 操作：为了看清楚循环的执行过程，可按F8键单步执行。同时，要选择“视图”菜单的“本地窗口”命令，观察变量的值。,7.4.2 Do循环语句 1语句的一般格式 （1）格式1 Do While | Until 条件 循环体 Loop 选择While，语句的执行过程是：首先判断条件，若条件成立（即条件为真），则执行循环体；然后再判断条件，条件成立再执行循环体；当条件不成立（即条件为假）时结束循环，接着执行它的后续语句。简言之，当条件成立时反复执行循环体，直到条件不成立时为止。如左图所示。 选择Until，语句执行过程是：当条件不成立（即条件为假）时反复执行循环体，直到条件成立（即条件为真）时结束循环。 如右图所示。,（2）格式2 Do 循环体 Loop While | Until 条件 选择While，语句的执行过程是：首先执行循环体一次；之后判断条件，若条件成立（即条件为真）则执行循环体；然后再判断条件，条件成立再执行循环体；直到条件不成
