单元6.3 使用宏及VBA-创建VBA程序-高二《数据库应用基础-Access2016》同步教学课件 （高教社·第3版）

数据库应用基础 ACCESS 2016 单元六 使用宏及VBA 目录页 01 OPTION 02 OPTION 03 OPTION 04 OPTION 任务一 创建宏 任务二 创建宏组 任务三 创建VBA程序 任务四 创建登录窗体 任务实施 技能拓展 2 03 OPTION 任务三 创建VBA程序 任务实施 技能拓展 3 任务三 创建VBA程序 问题导入 在实际应用中，单击“保存”按钮时，除了添加商品进货或销售记录，还需要同步更新商品的库存数据。如何编写实现该功能的代码呢？ 任务实施 技能拓展 VBA(Visual Basic for Applications)是Office的内置编程语言，是Visual Basic语言的子集，具有灵活、功能强等优点。在Access 2016中，VBA的功能是通过模块来实现的。 创建VBA程序 任务与目标 任务三 创建VBA程序 任务实施 技能拓展 5 一、VBA数据类型 VBA提供了多种数据类型，表6-4列出的VBA基本的数据类型。 知识准备 数据类型 含义 符号 字节数 Byte 单字节型   1 Boolean 布尔型   2 Integer 整型 % 2 Long 长整型 & 4 Single 单精度浮点型 ! 4 Double 双精度浮点型 # 8 Currency 货币型 @ 8 Decimal 浮点型   14 Date 日期型   8 Object 对象型   4 String 字符型 $ 1 Variant 变长型   不定 表6-4 VBA基本数据类型 任务实施 技能拓展 6 一、VBA数据类型 在使用VBA的编程过程中，经常需要将某一数据类型转换为另一种数据类型，表6-5列出了常用的数据类型转换函数。 知识准备 表6-5 VBA常用数据类型转换函数 转换函数 返回类型 转换函数 返回类型 Cbyte Byte Ccur Currency Cint Integer Cdec Decimal Clng Long Cdate Date Csng Single Cstr String Cdbl Double Cvar Variant 任务实施 技能拓展 7 二、VBA基本术语 (1) 常量 常量是在程序运程过程中始终固定不变的量。在编写VBA代码过程中，有时会用到一些反复使用的常数，这时可以在代码中定义常量来代替这些常数，以提高代码的可维护性。 定义常量的语法为： [Public/Private] Const 常量名 [As type] = 表达式 例如，定义常量Pi代表圆周率的语句为： Const Pi = 3.1415926 知识准备 任务实施 技能拓展 8 二、VBA基本术语 (2) 变量 变量是临时存储单元，用来保存程序运行期间的可变数据。每一个变量在它的作用范围内都要有一个唯一的标识，即变量名。 在VBA中，对变量的命名通常遵循以下规则： 变量名必须以字母开头。 变量名长度不能超过255个字符。 变量名中不能包含空格、.、!、@、#等字符。 不能与VBA中使用的关键字、函数、方法等同名。 知识准备 任务实施 技能拓展 9 二、VBA基本术语 (2) 变量 变量在引用前必须先声明，声明变量的语法为： Dim 变量名 [As type] 例如：Dim Str1 As String ’声明变量Str1为字符型 Dim x As Integer,y As Integer,z As Integer ’声明变量x、y、z为整型 知识准备 任务实施 技能拓展 10 二、VBA基本术语 (3)数组 数组是按一定顺序排列的变量的集合，由一系列元素组成，每一个元素用下标来进行区别。声明数组的语法为：Dim 数组名(下标1,下标2) [As type] 例如： Dim Ayyay1(5) As String ’声明包含6个元素的字符型一维数组 Dim Array2(9,9) As Integer ’声明10行乘10列的整型二维数组，包含100个元素。 知识准备 任务实施 技能拓展 11 二、VBA基本术语 (3)数组 如果有程序运行之前不能确定数组的大小，可以将数组声明为动态数组。声明动态数组时，首先使用Dim声明空的动态数组，然后使用ReDim设置数组元素个数。每次使用ReDim设置数组时，原有数组中的内容全部清空。 例如： Dim Array1() As Integer ReDim Array1(5,5) ReDim Array1(10,10) 知识准备 任务实施 技能拓展 12 二、VBA基本术语 (4) 常量、变量和数组的应用范围 常量和变量均有三个范围级别：过程级别、私有模块级别和公共模