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.