有两种方法可以获得变量类型
方法一: 用VB6函数VarType(varname) ,这个函数返回一个整数,整数的含义见下表
![](https://video.ask-data.xyz/img.php?b=https://iknow-pic.cdn.bcebos.com/728da9773912b31b7863c4fc8318367adbb4e1dc?x-bce-process=image%2Fresize%2Cm_lfit%2Cw_600%2Ch_800%2Climit_1%2Fquality%2Cq_85%2Fformat%2Cf_auto)
举例
'定义变量
Dim IntVar, StrVar, DateVar
'初始化各个变量
IntVar = 459
StrVar = "Hello World"
DateVar = #2/12/69#
Dim MyCheck As Integer
MyCheck = VarType(IntVar) 'MyCheck = 2,即Interger类型
MyCheck = VarType(DateVar) 'MyCheck = 7,即Date类型
MyCheck = VarType(StrVar) 'MyCheck = 8,即String类型
方法二:用TypeName(varname)函数,返回变量类型的名称,返回值为字符串类型。
举例
Dim a
a = "abc"
Debug.Print TypeName(a) '输出为 String
a = 100
Debug.Print TypeName(a) '输出为 Integer
a = #6/27/2015#
Debug.Print TypeName(a) '输出为 Date