返回一个 Integer ，该值指示变量的子类型。
语法
VarType(varname)
必需 varname 参数是一个 Variant ，它包含除用户定义的类型以外的任何变量。
返回值
| 不断 | 值 | 说明 |
|---|---|---|
vbEmpty |
0 | 空 (未初始化) |
vbNull |
1 | null (没有有效的数据) |
vbInteger |
2 | 整型 |
vbLong |
3 | 长整数 |
vbSingle |
4 | 单精度浮点数 |
vbDouble |
5 | 双精度浮点数 |
vbCurrency |
6 | 货币值 |
vbDate |
7 | 日期值 |
vbString |
8 | String |
vbObject |
9 | 对象 |
vbError |
10 | 误差值 |
vbBoolean |
11 | 布尔值 |
vbVariant |
1.2 |
Variant (仅用于变体数组) |
vbDataObject |
1.3 | 数据访问对象 |
vbDecimal |
14 | 十进制值 |
vbByte |
17 | 字节值 |
vbUserDefinedType |
36 | 包含用户定义的类型的变体 |
vbArray |
8192 | Array |
注意
这些常量由 Visual Basic for Applications (VBA) 定义。 可以在代码中的任何位置使用名称，而不是实际值。
备注
函数 VarType 从不单独返回 的值 vbArray 。 它始终将该值添加到另一个值，以指示特定类型的数组。
该 vbVariant 常量仅返回 ， vbArray 以指示 的 VarType 参数是值数组 Variant 。 例如，为整数 vbInteger + vbArray数组返回的值为 、 或 8194。
如果对象具有默认属性， VarType(object) 则返回该对象的默认属性的类型。
示例
注意
下面的示例演示了如何在 Visual Basic for Applications (VBA) 模块中使用此函数。 有关使用 VBA 的详细信息，请在搜索旁边的下拉列表中选择“开发人员参考”，并在搜索框中输入一个或多个术语。
此示例使用 VarType 函数来确定变量的子类型。
Dim IntVar, StrVar, DateVar, MyCheck
' Initialize variables.
IntVar = 459
StrVar = "Hello World"
DateVar = #2/12/69#
MyCheck = VarType(IntVar) ' Returns 2.
MyCheck = VarType(DateVar) ' Returns 7.
MyCheck = VarType(StrVar) ' Returns 8.