第11章VBA编程

11.2 VBA程序设计基础
（2）数组声明 ①声明静态数组 格式一： Dim | Public | Private 变量名（下标1的上界） [AS 类型/类型符] [，变量名（下标2的上界） [AS 类型/类型符]] „„[，变量名（下标n的上界） [AS 类型/类型符]] 格式二： Dim | Public | Private变量名 （[<下标的下界1>to]下标1的上界） [AS 类型/类型符] [，变量名（[<下标的下界2>to]下标2的上界） [AS 类型/类型符]] „„„„ [，变量名（[<下标的下界n>to]下标n的上界） [AS 类型/类型符]] 功能：定义静态数组的名称、数组的维数、数组的大小、数 组的类型。
存变量。 （1）数组特点
Visual BASIC中的数组有以下主要特点：
①数组是一组相同类型的元素的集合； ②数组中各元素有先后顺序，它们在内存中按排列顺序 连续存储在一起； ③所有的数组元素是用一个变量名命名的一个集合体， 而且每一个数组元素在内存中独占一个内存单元，可视同为 一个内存变量。
第11章VBA编程
第11章VBA编程
11.2.2 常量
11.2 VBA程序设计基础
1.文字常量 文字常量实际上就是常数，数据类型的不同决定了常量 的表现也不同。 -123.56， +3.256767E3， “A20103”，#04/12/98# 2.符号常量 符号常量是命名的数据项，其类型取决于<表达式>值的 类型。 Const 常量名 [As 类型|类型符号] = <表达式> [，常量名 [As 类型|类型符号] = <表达式>] Const I1% =14135 PI As Single =3.14159 3．系统常量 系统常量是Visual BASIC系统预先定义好的，用户可直 接引用。 vbRed vbOK vbYes
第11章VBA编程
11.2.4 函数
1.常用数学函数如下表：
11.2 VBA程序设计基础
第11章VBA编程
2.常用字符函数如下表：
11.2 VBA程序设计基础
第11章VBA编程
3.常用转换函数如下表：
11.2 VBA程序设计基础
第11章VBA编程
4.常用日期函数如下表：
11.2 VBA程序设计基础
第11章VBA编程
多路分支语句的流程图如下：
11.3 程序基本结构
第11章VBA编程
11.3.3 循环结构
11.3 程序基本结构
1.For语句 For循环语句又称“计数”型循环控制语句，它以指定的次 数重复执行一组语句。 For <循环变量>＝<初值> to <终值> [Step <循环体> <步长>]
第11章VBA编程
11.3.2 分支结构
11.3 程序基本结构
分支结构是在程序执行时，根据不同的“条件”，选择执行 不同的程序语句，用来解决有选择、有转移的诸多问题。 1.If语句 （1）单路分支 格式一： If <表达式> Then <语句序列> End If 格式二： If <表达式> Then <语句> 功能：先计算<条件表达式>的值，当<条件表达式>的值为 True时，执行<语句序列>/<语句>中的语句，否则，直接执行IF语 句的下一条语句。
第11章VBA编程
11.2 VBA程序设计基础
②声明动态数组 建立动态数组有两步操作： 其一：用Dim语句声明动态数组 Dim | Public | Private 变量名（） 功能：定义动态数组的名称。 其二：用ReDim语句声明动态数组的大小 ReDim [Preserve] 变量名（下标1的上界） [AS 类型/类型符] [，变量名（下标2的上界） [AS 类型/类型符]] „„[，变量名（下标n的上界） [AS 类型/类型符]] 功能：定义动态数组的大小。
[Exit For]
Next <循环变量> 功能：用循环计数器<循环变量>来控制<循环体>内的语句
的执行次数。
第11章VBA编程
11.3 程序基本结构
For语句（当<步长>大于0时 ）的流程图如下：
第11章VBA编程
11.3 程序基本结构
For语句（<步长>小于0时 ）的流程图如下：
第11章VBA编程
授课教师：
第11章 VBA编程
本章要点
了解什么是标准模块，掌握 VBA程序设计相关内容，掌握程 序基本结构，能够利用VBA程序 设计主窗体、查询窗体、登录窗 体等。
第11章VBA编程
11.1 标准模块
11.1 标准模块
标准模块是独立于窗体与报表的模块，用于以过程形式保 存代码，这些代码是由Visual Basic程序设计语言编写的语句 的集合。 在“数据库”窗口，选择“模块”为操作对象，再按“新 建”按钮，便可打开Visual Basic程序设计语言编辑器，在 “代码”编辑窗口，可以输入、编辑用Visual Basic程序设计 语言编写的“事件过程”，如图所示：
第11章VBA编程
11.3.1 顺序结构
11.3 程序基本结构
顺序结构是在程序执行时，根据程序中语句的书写 顺序依次执行的语句序列。 在程序中经常使用的顺序结构的语句有：赋值语句 (=)、输入、输出语句(Print、Cls)、注释语句（’或 Rem）、终止程序（End）等。 顺序结构语句的流程，如图所示:
2.While语句
11.3 程序基本结构
While语句又称“当”型循环控制语句，它是通过“循 环条件”控制重复执行一组语句。
While <循环条件>
<循环体> Wend
功能：当<循环条件>为True时，执行<循环体>内的语
句，遇到Wend语句后，再次返回，继续测试<循环条件>是 否为True，直到<循环条件>为False，执行Wend语句的下一
第11章VBA编程
11.3 程序基本结构
功能：该语句执行时，根据<测试表达式>， 从上到下依次检查n个<表达式值列表>，如果有一 个与<测试表达式>的值相匹配，选择n+1个<语句 序列>中对应的一个执行，当所有Case中的<表达 式值列表>中没有与<测试表达式>的值相匹配时， 如果有Case Else项，则执行<语句序列n+1>，再 执行End Select后面的下一条语句；否则，直接 执行End Select后面的下一条语句。
第11章VBA编程
5.常用测试函数如下表：
11.2 VBA程序设计基础
第11章VBA编程
6.颜色函数
（1）QBColor函数 QBColor(N)
11.2 VBA程序设计基础
功能：通过N（颜色代码）的值产生一种颜色。
（2）RGB函数 RGB(N1,N2,N3)
功能：通过N1,N2,N3（红、绿、蓝）三种基本
第11章VBA编程
11.2.1 数据类型
1.标准数据类型如下表所示：
11.2 VBA程序设计基础
第11章VBA编程
2.用户自定义数据类型
11.2 VBA程序设计基础
Visual BASIC除了为用户提供了标准数据类型 之外，还允许用户自定义数据类型，这种数据类型 可包含一个或多个标准数据类型的数据元素。 定义自定义数据类型语句格式如下： Type 数据类型名 数据元素名 [([下标])] 数据元素名 [([下标])] „„„„ End Type As As 类型名 类型名
第11章VBA编程
11.2.3 变量
11.2 VBA程序设计基础
变量（Variable）在程序运行中其值可以改变。我们 这里所讲的是一般意义下的简单变量（又称内存变量）。 1.变量的声明 在程序中使用变量，就要给变量定义名称及类型，这 就是对变量进行声明。 （1）显示声明 声明局部变量语句格式如下： Dim 变量名 [AS 类型/类型符] [，变量名 [AS 类型/类型符]] （2）隐式声明 未进行显示声明而通过赋值语句直接使用，或省略了 [AS 类型/类型符]短语的变量，其类型为变体类型。 （3）强制声明 Option Explicit
颜色代码产生一种颜色，其中N1,N2,N3的取值范围 为0~255之间的整数。
第11章VBA编程
11.2.5 表达式
11.2 VBA程序设计基础
1.算术表达式及表达式的实例如下表所示：
第11章VBA编程
11.2 VBA程序设计基础
2.字符表达式及表达式的实例如下表所示：
第11章VBA编程
11.2 VBA程序设计基础
第11章VBA编程
双路分支语句的流程图如下：
11.3 程序基本结构第11章VBA编程来自11.3 程序基本结构
（3）多路分支 Select case语句又称多路分支语句，它是根据多个表达式列 表的值，选择多个操作中的一个对应执行。 Select Case <测试表达式> Case <表达式值列表1> <语句序列1> Case <表达式值列表2> <语句序列2> „„ „„ Case <表达式值列表n> <语句序列n> [Case Else <语句序列n+1>] End Select
第11章VBA编程
2.变量作用域
11.2 VBA程序设计基础
变量的作用域就是变量在程序中的有效范围。 能否正确使用变量，搞清变量的作用域是非常重要的，一旦