VBA提供了哪些标准数据类型？
VBA提供了15种标准数据类型，具体见下表：
数据类型的转换
1.
各种进制转换函数
VB中涉及到的数据进制之间的转换函数主要有如下几个:
Hex
函数:
返回代表十六进制数值的
String;
Oct
函数:
返回代表一数值的八进制值的Variant
(String);
Cint函数:
强制将一个表达式转换成-32,768
至
32,767的整型;
CLng函数:
强制将一个表达式转换成-2,147,483,648
至
2,147,483,647的长整型;
Cdec函数:
强制将一个表达式转换成Decimal
数据类型;
CDbl函数:
强制将一个表达式转换成Double
数据类型;
例子:
(1)
A=hex(5)
返回5;
(2)
B=hex(10)
返回A
(3)
C=hex(23)
返回17
(4)
D=oct(5)
返回5
(5)
E=oct(10)
返回12
(6)
F=oct(23)
返回27
(7)
G=Cint(&H17)
返回23
(8)
H=Cint(&O12)
返回10
值得一提的是Hex函数和Oct函数返回的都是字符串,如果是想将十六进制或是八进制的字符串变量转换成十进制,可以按如下方法进行:
C=”17”
17为十六进制数值的String
C=”&H”
&
C
Ic=Cint(C)
返回23
2.
字符串和数字转换函数
Str()和Val()用于字符串和数字的相互转换;
Chr()和Asc()用于字符串和AscII码的相互转换;
Chrw()和Ascw()用于Unicode码和中文的相互转换;
Format()函数用途十分广泛的一个函数,功能十分强大.
例子:
(1)
MyString
=
Str(-459.65)
'
返回
"-459.65"。
MyString
=
Str(459.001)
'
返回
"
459.001"。
(2)
MyValue
=
Val("
2
45
7")
'
返回
2457。
MyValue
=
Val("24
and
57")
'
返回
24。
(3)
MyChar
=
Chr(97)
'
返回
a。
MyChar
=
Chr(37)
'
返回
%。
(4)
MyNumber
=
Asc("Apple")
'
返回
65。
MyNumber
=
Asc("a")
'
返回
97。
