VBA可用变量保存计算结果，设置属性，指定方法的参数以及在过程间传递数值。为了提高效率，VBA为变量定义了一个数据类型的集合。在Access中，很多地方都要指定数据类型，例如过程中的变量、定义表和函数的参数等。 

　　VBA支持多种数据类型，为用户编程提供了许多方便。表6q列出了VBA程序中主要的数据类型，以及它们的存储空间和取值范围。 

　　VBA的数据类型表 
　　数据类型    存储空间    取值范围 
　　Byte(字节型)    1字节0～255 
　　Boolean(布尔型)  2字节True或False 

　　Integer(整型)    2字节    一32 768～32 767 
　　Long(长整型)4字节    一2 147 483 648～2 147 483 647 
　　Single 4字节    负数：一3．402823E38～一1．401298E--45 

　　(单精度浮点型)    正数：1．401298E～45～3．402823E38 
　　Double 8字节    负数：一1．79769313486232E308--一4．94065645841247E--324 
　　(双精度浮点型)    正数：4．94065645841247E--324～1．7976931 3486232E308 

　　Currency(货币型)8字节    一922 337 203 685 477．5808～922 337 203 685 477．5807 
　　Decimal(小数型)  14字节    无小数点时为+／一79 228 162 514 264 337 593 543 950 
　　335，有小数点时，有28位数，为十／一7．9228162514264337593543950335，最小的非零值 

　　为+/一0．0000000000000000000000000001 
　　Date(日期型)8字节    100年1月1日到9999年12月31日 
　　Object(对象型)4字节    任何Object引用 
　　String(变长)    10字节十字符串长0到大约20亿 

　　String(定长)    字符串长    1到大约65 400 
　　Variant(数字)    16字节    任何数字值，最大可达Double的取值范围 
　　Variant(字符)    22字节+字符串长  与变长String有相同的取值范围 
　　用户自定义    所有元素所需的存每个元素的取值范围与它本身的数据类型的取值范围相同 

　　(利用Type)    储空间 
　　对数据类型的几种特殊情况说明如下：
　　(1)表示数值型数据的符号 
　　整型用符号“％”表示，长整型用“＆”表示，单精度型用“!”表示，双精度型用“#”表示。小数型数据仅用在变量Variant数据中。也就是说，用户不能用Decimal关键字来定义某个变量，但可用Cdec函数创建子类型为小数型的变量类型数据。 

    (2)布尔型数据的值 
    布尔型数据只有两种值：True和False。将其他数值类型转换为布尔数据类型时，0为False，其他值均为True。当布尔型值转换为其他数据类型时，False转换为O，True转换为一1。 

    (3)日期型变量的值 
    任何可以识别的文本日期都可赋给日期变量。日期文字必须用符号“#”括起来。例如“#Januaryl998#”或“#1Jan98#”。 
    日期变量以计算机中的短日期格式显示，时间则以计算机的时间格式(12小时或24小时)显示。 
    将其他数值类型转换为日期变量时，小数点左边的值表示日期信息，小数点右边的值则表示时间。午夜为O，中午为0．5，负整数表示1899年12月30日之前的日期。 

    (4)变量的初始化 
    vBA在初始化变量时，将数值变量初始化为O，变长字符串初始化为零长度字符串 (””)，对定长字符串都填上零，将Variant变量初始化为Empty，将每个用户定义的类型变量的元素都当成个别的变量来初始化。 

    (5)Variant数据类型 
    如果未给变量指定数据类型，则Access将自动指定其为Variant(变体)数据类型。Variant是一种特殊的数据类型，除了定长string数据及用户定义类型外，可以包含任何种类的数据。Variant也可以包含Empty、Error、Not，hing及Null特殊值。可以用Var—Type函数或TypeName函数来决定如何处理Variant中的数据。 

    可以用Variant数据类型来替换任何数据类型。如果Variant变量的内容是数字，则可以用字符串来表示数字，或是用它实际的值来表示，这要由上下文来决定。例如，假定变量的声明和赋值语句为： 

    Dim MyVar As Variant 
    MyVar一98052 

则MyVar变量的值为数值98 052。