龙空技术网

数据类型 - EXCEL VBA(7)

银河统计工作室 363

前言:

此时姐妹们对“vba强制转换数据类型”大概比较珍视,姐妹们都需要分析一些“vba强制转换数据类型”的相关资讯。那么小编也在网上网罗了一些关于“vba强制转换数据类型””的相关内容,希望小伙伴们能喜欢,姐妹们快快来学习一下吧!

在软件开发中,数据类型是指变量或对象可以存储的数据的特定类型。不同的编程语言和软件平台可能具有不同的数据类型。使用 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函数都是从定义数据类型开始的。正确使用数据类型是编写高效、可靠和安全程序的关键。选择正确的数据类型可以提高程序的性能、减少内存使用和防止数据类型转换错误。

标签: #vba强制转换数据类型