VarType Function
Syntax
VarType(var)
Group
Description
Return a number indicating the type of value stored in var.
| Parameter | Description |
|---|---|
| var | Return a number indicating the type of value stored in this variable. |
| Result | Value | Description |
|---|---|---|
| vbEmpty | 0 | Variant variable is empty. It has never been assigned a value. |
| vbNull | 1 | Variant variable is null. |
| vbInteger | 2 | Variable contains an integer value. |
| vbLong | 3 | Variable contains a long value. |
| vbSingle | 4 | Variable contains a single value. |
| vbDouble | 5 | Variable contains a double value. |
| vbCurrency | 6 | Variable contains a currency value. |
| vbDate | 7 | Variable contains a date value. |
| vbString | 8 | Variable contains a string value. |
| vbObject | 9 | Variable contains an object reference. |
| vbError | 10 | Variable contains a error code value. |
| vbBoolean | 11 | Variable contains a boolean value. |
| vbVariant | 12 | Variable contains a variant value. (Only used for arrays of variants.) |
| vbDataObject | 13 | Variable contains a non-ActiveX Automation object reference. |
| vbDecimal | 14 | Variable contains a 96 bit scaled real. |
| vbByte | 17 | Variable contains a byte value. |
| vbUserDefinedType | 36 | Variable contains a User Defined Type value. |
| +vbArray | 8192 | Variable contains an array value. Use VarType( ) And 255 to get the type of element stored in the array. |
See Also: TypeName.
Example
Sub Main
Dim X As Variant
Debug.Print VarType(X) ' 0
X = 1
Debug.Print VarType(X) ' 2
X = 100000
Debug.Print VarType(X) ' 3
X = 1.1
Debug.Print VarType(X) ' 5
X = "A"
Debug.Print VarType(X) ' 8
Set X = CreateObject("Word.Basic")
Debug.Print VarType(X) ' 9
X = Array(0,1,2)
Debug.Print VarType(X) ' 8204 (8192+12)
End Sub