在Access中，我们通过创建表、查询、窗体、报表、页、宏等对象，可以将数据整合在一起，快速建立数据库管理系统。但是通过这些对象创建的数据管理系统有一定的局限性，无法实现复杂的数据管理。

而VBA则可以对Access的数据管理功能进行扩展，使开发出来的系统更具灵活性和自主性，可以完成一些无法实现的功能。

在进入 VBA 编程之前， 首先需要了解VBA 支持的数据类型，因为不同的数据类型有着不同的存储方式和数据结构。如果不指定数据类型，VBA会默认将其作为变体型 Variant，此类型可以根据实际需要自动转换成相应的其他数据类型。

但是， 让 VBA 自动转换数据类型会使程序的执行效率降低， 所以在编写 VBA 代码时， 必须定义好数据类型， 选择占用字节最少、 又能很好地处理数据的类型， 才能保证程序运行更快。

VBA 支持的数据类型主要有字符串型、 数值型、 日期型、 货币型等。除了这些内置的数据类型外， 用户还可以自定义数据类型。下表中列出了常用的数据类型供用户参考。

技术看板

在 Access 中， 字段的数据类型与 VBA 中的数据类型大多都是相对应的。 例如， 字段的货币类型与 VBA 中的货币型相对应， 是 / 否类型与 VBA中的布尔型相对应。

1. 字符串型

字符串型用来存储字符串数据，它是一个字符序列， 由字母、 数字、符号和文字等组成。 在 VBA 中， 字符串类型分为定长字符串型和变长字符串型两种。

用户定义字符串时， 需要用双引号把字符串引起来， 而双引号并不算在字符串中。 例如， "book"、 " 员工信息表 " 和 ""（空白字符串） 等， 都表示字符串型数据。

具体来说， 定义字符串型数据的方法如下。

Dim str1 as String

这表示， 声明一个名为 str1 的字符串型变量。对于定长字符串的定义，可以使用"String*Size" 的方式。 例如：

Dim str2 as String*12

数值数据型是可以进行数学计算的数据， 在 VBA 中， 数值数据型分为字节、 整型、 长整型、 单精度浮点型和双精度浮点型。

其中， 整型和长整型数据是不带小数点和指数符号的数。 例如：

111、 -189、 222% 均表示整型数据。111&、 -189& 均表示长整型数据。

单精度浮点型和双精度浮点型数据是带有小数部分的数。 例如：

111 ！、 -189.75、 0.111E+3 均表示单精度浮点型数据。111#、 -189.75#、 0.111E+3#、0.111D+3 均 表 示 双 精 度 浮 点 型数据。

在 VBA 中， 定义整型数据变量有两种方法： 一种是直接使用 Integer关键字， 类似前文中定义字符串型变量的方法； 另一种是直接在变量的后面添加一个百分比符号（%）。 例如：

Dim a1 as IntegerDim a2%

以上定义的 a1 和 a2 都是整型数据变量。

技术看板

定义其他数值数据类型的方法与定义整型数据变量的方法类似， 只是后面的类型标识符不一样。

3. 日期型

日期型数据用来表示日期和时间信息， 在存储时， 日期型数据的整数部分被存储为日期值， 小数部分被存储为时间值。

用户定义时间类型数据时， 需要用井号（#） 把日期和时间括起来。例如：

#August 5,2018#、 #2018/12/25#、#2018-12-25 15:25:30# 等，均是表示日期型数据。

定义日期型数据的方法如下。

Dim aa as date

技术看板

在 Access 中， 可以使用 Now() 函数来提取当前时间， 使用 Date() 函数来提取当前日期。

4. 货币型

货币型是为了表示货币而设置的， 此类数据以 8 字节进行存储， 并精确到小数点后4位，小数点前15位，而小数点后 4 位的数字都将被舍去。

定义货币型数据的方法如下。

Dim cost as currency

布尔型是用于逻辑判断的数据类型， 其值为逻辑值。 布尔型数据只有True（真） 或 False（假） 两个值。

定义布尔型数据的方法如下。

Dim c as a Boolean

技术看板

将布尔数据转换为整型时， True转换为 -1， False 转换为 0。 当将其他类型数据转换为布尔型数据时， 非 0数据转换为 True， 0 转换为 False。

6. 变体型

当用户在编写 VBA 时， 如果没有定义某个变量的数据类型， 那么系统会自动将这个变量定义为变体型。如果以后调用这个数据， 就可以根据需要改变为不同的数据类型。

变体型是一种特殊的数据类型，除了定义长字符串型和用户自定义类型外， 它可以包含任何各类的数据，甚至包含 Empty、 Error、 Nothing 和 Null等特殊值。

7. 自定义的数据类型

除了前文中系统提供的基本数据类型外， 在 VBA 中， 用户还可以自定义数据类型。 自定义的数据类型实际是由基本数据类型构建而成的一种数据类型， 其语法格式如下。

Type 数据类型名类型元素名 as 系统数据类型名End Type

例如， 要定义一个名为 Lily 的用户数据类型：

Type LilyRDnumber as LongRDname as StringRDphone as LongRDbirthday as DateEnd Type

上文中共包含了 4 个元素。

RDnumber 定义了编号为长整型变量。RDname 定义了姓名为字符串型变量。RDphone 定 义 了 电 话 为 长 整 型变量。RDbirthday 定义了生日为日期型变量。