在软件开发中,数据类型是指变量或对象可以存储的数据的特定类型。不同的编程语言和软件平台可能具有不同的数据类型。使用 Excel VBA 进行编程时,正确选择适当的数据类型对于程序的性能和正确性非常重要。下面用具体代码介绍EXCEL VBA各种数据类型。
1、整型(Integer)
整型数据存储为16位(2个字节)的数字形式,其范围为[−32768, 32767] 。整型数据运行较快,而且占用内存较少。整型数据变量声明如下:
Dim x as IntegerDim x%
以上两条语句都声明了一个整数变量。注意,整型的类型声明字符是百分号(%)。
2、长整型(Long)
长整型数据存储为32位(4个字节)有符号的数字形式,其范围为[−2147483648, 2147483647]。长整型数据变量声明如下:
Dim x As LongDim x&
如果要在VBA程序中保存较大数值,可采用长整型变量来保存。长整型的类型声明字符是和号(&)。
3、单精度浮点型(Single)
整型和长整型都用来表示整数,很多场合需要处理小数,这是就需要使用实数型数据。
实数型分为单精度浮点型和双精度浮点型。单精度浮点型数据存储为32位(4个字节)浮点数值的形式。通常以指数形式(科学计数法)来表示,以“E”或“e”表示指数部分。
其范围在负数的时候为[−3.402823E38, −1.401298E−45]、正数时为[1.401298E−45, 3.402823E38]。单精度浮点型的类型声明字符是感叹号(!),变量声明如下:
Dim x As SingleDim x!
4、双精度浮点型(Double)
双精度浮点型可以表示精度更高和更大的数值。双精度浮点型数据存储为64位(8个字节)浮点数值的形式。
其范围在负数的时候为[−1.79769313486231E308, −4.94065645841247E−324],
正数时为[4.94065645841247E−324, 1.79769313486231E308]。
双精度浮点型的类型声明字符是数字符号(#),变量声明如下:
Dim x As DoubleDim x#
若VBA程序中处理的数据范围很大,或小数位很多,可采用双精度浮点型。
5、货币型(Currency)
该种数据类型主要用来表示货币值。货币类型数据存储为64位(8个字节)整型的数值形式。其小数点左边有15位数字,右边有4为数字。
这种表示法其范围在负数的时候为[−922337203685477.5808, 922337203685477.5807]。
货币型的类型声明字符是at符号(@),变量声明如下:
Dim x As CurrencyDim x@
货币型数据类型在货币计算中很有用,在这种场合精度特别重要。浮点型数据比货币型数据范围大得多,但有可能产生小的进位误差,而货币型采用更多的字节保存数据,能减少计算误差。
6、字节型(Byte)
字节型数据类型为数值型,用来保存[0, 255]之间的整数,占用8位(1个字节)存储空间。常用字节型数据类型存储二进制数据,变量声明如下:
Dim x As Byte
字节型表示的数据范围有限,一般情况下不用来保存数据。
7、字符型(String)
字符型数据类型表示为字符串,VBA中字符串包括在英文半角状态的双引号中,VBA的字符串分为变长与定长两种类型。变长字符串的长度是不确定的,最多可包含大约20亿(2^31)个字符;定长字符串的长度是确定的,可包含1到大约64K(2^16)个字符。变量声明如下:
Dim str1 As String '变长字符串Dim str2 As String * 10 '定长字符串Dim str3 As Stringx = 'EXCEL VBA'y = '12345'z = '' '空字符串
注:VBA代码中,符号“ ' ”为解释标记符号,“ ' ”后面一般是对该行代码做解释
代码中变量str1为变长字符串,可保存多个字符。变量str2为定长字符串,该变量定义后将一直占用10个字符。
8、布尔型(Boolean)
布尔型数据只有两个值(True或False),该类型适合存储简单的二元信息,可保存为16位2个字符的数值形式。变量声明如下:
Dim x As Boolean
当转换其它类型数据为Boolean值时,0会转换为False,而其它的值则变成True。当转换Boolean值为其它数据类型时,False成为0,而True成为-1。
9、日期型(Date)
VBA支持复杂的日期操作和运算。日期型数据存储为64位(8个字节)浮点数值形式,可表达的日期范围从1000年1月1日到9999年12月31日,而时间可以从0:00:00到23:59:59。
任何可辨认的文本日期都可以赋值给Date变量。日期文字需要用数字符号(#)括起来,例如,#January 11,1998#。变量声明如下:
Dim x As Datex = #5/1/2019#Sheet1.Cells(1, 1) = xSheet1.Cells(2, 1).NumberFormatLocal = 'm-d-yyyy'Sheet1.Cells(2, 1) = x
日期型变量会根据计算机中的短日期格式来显示。时间则根据计算机的时间格式(12小时或24小时时制)来显示。当其它数值类型要转换为日期型时,小数点左边的值表示日期信息,而小数点右边的则表示时间。负数表示1899年12月30日之前的日期。
10、对象型(Object)
VBA是面向对象的程序设计语言,用户可在程序中访问各种对象,如EXCEL的工作表、单元格等。对象型数据存储为32位(4个字节)的地址形式,引用对象时必须使用Set语句给对象变量赋值。对象变量使用结束后,应为其赋值为Nothing。变量声明如下:
Dim myObj As ObjectSet myObj = Worksheets('sheet1')myObj.Cells(1, 1) = 'object'Set myObj = Nothing
11、变体型(Variant)
变体型是一种特殊数据类型,VBA代码中所有没有被声明的数据类型的变量都默认为变体型。除了定长String数据及用户定义类型外,可以包含任何种类的数据。Variant也可以包含Empty、Error、Nothing及Null等特殊值。可以用VarType函数或TypeName函数来决定如何处理变体型中的数据。样例代码如下:
Dim myObj As ObjectSet myObj = Worksheets('sheet1')y = 100MsgBox VarType(y)MsgBox VarType(myObj)MsgBox VarType(z)
12、自定义数据类型(Type)
可以使用Type语句定义自己的数据类型。用户自定义类型经常用来表示数据记录,记录一般由多个不同类型的数据元素组成。自定义数据类型定义如下:
Type ProductoName As String '产品名称oQuantity As Integer '库存数量oPrice As Currency '单价oOrder As Integer '订购量End Type
自定义数据类型的定义必须放在模块(模块和类模块)的声明部分。在VBE开发环境中 -> 【插入】 -> 【模块】,系统在资源管理器中加入节点“模块1”。鼠标双击“模块1”节点,在代码窗口通用栏中键入上述代码。如图:
使用Type语句声明了一个用户自定义类型后,就可以在任何事件中声明、使用该类型的变量。可以用Dim、Private、Public、ReDim或Static来声明用户自定义类型的变量。样例代码如下:
Dim myPro As ProductmyPro.oName = '电视'myPro.oQuantity = 10myPro.oPrice = 2345.99myPro.oOrder = 5MsgBox myPro.oName
13、枚举类型(Enum)
枚举就是将变量的值逐一列举出来,属于该枚举的变量只能取列举的某一个值。当一个变量有几种可能值时,可以定义为枚举类型。枚举类型数据定义如下:
Public Enum Grade 星期一 = 1 星期二 星期三 星期四 星期五 星期六 星期日End Enum
在默认情况下,枚举类型第一项的值是0,而上述枚举类型定义代码自定义设置枚举类型第一项的值为1。
枚举类型定义代码通常也放在模块(模块和类模块)的声明部分。使用Enum语句声明了一个枚举类型后,就可以在任何事件中声明、使用该类型的变量。可以用Dim、Private、Public、ReDim或Static来声明枚举类型的变量。样例代码如下:
Dim myGrade As Grade '声明自定义枚举变量myGrade = 星期五 '为变量赋值(键入等号后在下拉列表中选择)MsgBox myGrade '显示变量值为5
键入第二行代码的“=”时,系统自动出现下拉列表(星期一~星期日),用鼠标之间选择某个下拉选项即可。如图:
每一段VBA代码、每一个VBA函数都是从定义数据类型开始的。正确使用数据类型是编写高效、可靠和安全程序的关键。选择正确的数据类型可以提高程序的性能、减少内存使用和防止数据类型转换错误。
联系客服