Public Function IllustrateVariantVector( _ ByRef vArray() As Variant _ ) As String
For example Dim avarStuff() As Variant ReDim avarStuff(0 to 4) avarStuff(1) = "Line1" + vbCrLf + "Line2" avarStuff(2) = 23% avarStuff(3) = 23& avarStuff(4) = Null ? IllustrateVariantVector(avarStuff()) prints 0: (Empty) 1: "Line1%013%010Line2" (String * 12) 2: 23 (Integer) 3: 23 (Long) 4: Null (Null)See also:
IllustrateValue FunctionNote: See the IllustrateValue function for more details about how various data types are illustrated.
Copyright 1996-1999 Entisoft
Entisoft Tools is a trademark of Entisoft.