Public Function VarTypeFromString( _
ByVal vVarType As Variant _
) As Variant VarTypeFromString("String") = vbString
VarTypeFromString("STRING") = vbString
VarTypeFromString("LONG") = vbLong
VarTypeFromString("variant ARRAY") = vbVariant + vbArray
IsNull(VarTypeFromString("Unknown")) = TrueSee also: VarTypeToString Function
vbArray Property, et. al.
VarType Function (Visual Basic)vVarType: The name of a Visual Basic data type whose VarType value is to be returned. Function returns Null if vVarType is Null or cannot be fixed up to a String. Function returns Null if vVarType is not the name of a Visual Basic data type. Note: The match is case-insensitive, so it does not matter if the data type name is in upper- or lower-case.
v1.2 BugFix: Changed function to correctly recognize arrays of types other than Variant. Arrays are now identified by names like "Currency Array" or "Variant Array".
v1.5 Change: This function has been extended to support the new Decimal data type in VB 6.0.
Copyright 1996-1999 Entisoft
Entisoft Tools is a trademark of Entisoft.