VarType 函数
应用对象
Microsoft 365 专属 Access Access 2024 Access 2021 Access 2019 Access 2016
返回一个 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 | 变体 (仅用于变量数组) |
| vbDataObject | 1.3 | 数据访问对象 |
| vbDecimal | 14 | 十进制值 |
| vbByte | 17 | 字节值 |
| vbUserDefinedType | 36 | 包含用户定义的类型的变体 |
| vbArray | 8192 | Array |
注意
这些常量由 Visual Basic for Applications 指定。 名称可以在代码中的任何位置使用，以代替实际值。
备注
VarType 函数从不返回 vbArray 的值。 它始终添加到其他某个值，以指示特定类型的数组。 常量 vbVariant 仅与 vbArray 一起返回，以指示 VarType 函数的参数是 Variant 类型的数组。 例如，为整数数组返回的值计算为 vbInteger + vbArray 或 8194。 如果对象具有默认属性， 则 VarType (对象) 返回该对象的默认属性的类型。
示例
注意
下面的示例演示了如何在 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.