Constant Value Data Type / Verfiy Fn Conversion Type Char Def Lit
TypeName() Return Fn Type characters
vbEmpty 0 Empty IsEmpty
vbNull 1 Null IsNull
vbInteger 2 Integer IsNumeric CInt % <=2147483647
vbLong 3 Long integer CLong & >=2147483648
vbSingle 4 Single CSng !
vbDouble 5 Double CDbl # 1.2
vbCurrency 6 Currency CCur
vbDate 7 Date IsDate CDate #5/17/1993 9:32 AM#
vbString 8 String CStr $ "a" May be Either Variable or Fixed Length; Dim zVLStr As String or Dim zFLStr As String * 5
vbObject 9 Object IsObject eg a Range Object
vbError 10 Error IsError
vbBoolean 11 Boolean CBool x
vbVariant 12 Variant CVar
vbDataObject* 13 Object Can't Create this; VarType(wgDataObj)=vbObj?!
vbDecimal** 14 Decimal CDec @ Not Available in VB6? see Note 1) below
vbByte 17 Byte CByte x 0 to 255
vbLongLong* 20 LongLong CLngLng Valid on 64-bit platforms only
vbUserDefinedType* 36 Variant Not Available in VB6?
vbArray &H2000 Array *() IsArray The Array Type is Or'd with &H2000 (=8192); eg &H2003 for an Long Array
Data Type / vbType Constant / Value Verfiy Fn Conversion Type Char eg / Limits Notes
TypeName() VarType() Fn
VarType
Empty vbEmpty 0 IsEmpty
Null vbNull 1 IsNull
Integer vbInteger 2 IsNumeric CInt % <=2147483647
Long integer vbLong 3 CLong & >=2147483648
Single vbSingle 4 CSng !
Double vbDouble 5 CDbl # 1.2
Currency vbCurrency 6 CCur
Date vbDate 7 IsDate CDate #5/17/1993 9:32 AM#
String vbString 8 CStr $ "a" May be Either Variable or Fixed Length; Dim zVLStr As String or Dim zFLStr As String * 5
Object vbObject 9 IsObject eg a Range Object
Error vbError 10 IsError
Boolean vbBoolean 11 CBool x
Variant vbVariant 12 CVar
Object vbDataObject* 13 Can't Create this; VarType(wgDataObj)=vbObj?!
Decimal vbDecimal** 14 CDec @ Not Available in VB6? see Note 1) below
Byte vbByte 17 CByte x 0 to 255
LongLong vbLongLong* 20 CLngLng Valid on 64-bit platforms only
Variant vbUserDefinedType* 36 Not Available in VB6?
Array *() vbArray &H2000 IsArray The Array Type is Or'd with &H2000 (=8192); eg &H2003 for an Long Array