Mega Code Archive

 

Categories / VisualBasic Script / Data Type

 

Get the variable type for Variant

Sub VariantExample()     Dim varAnyThing     As Variant     varAnyThing = 12.345     Debug.Print VarType(varAnyThing)          varAnyThing = 12.345     varAnyThing = varAnyThing & " is a number"     Debug.Print VarType(varAnyThing)          varAnyThing = 12.345     varAnyThing = varAnyThing + "10"     Debug.Print VarType(varAnyThing)          varAnyThing = 12345     Debug.Print VarType(varAnyThing)          varAnyThing = 123456     Debug.Print VarType(varAnyThing) End Sub