|
Public Function StringMatrixToVariantMatrix( _
ByRef rTo() As Variant _
, ByRef vFm() As String _
) As Boolean Assuming
Static astrNames(0 To 1, 0 To 1) As String
astrNames(1, 1) = "Car"
Dim avarNames() As Variant
for example
StringMatrixToVariantMatrix(avarNames(), astrNames()) = True
leaves
avarNames(0, 0) = ""
avarNames(0, 1) = ""
avarNames(1, 0) = ""
avarNames(1, 1) = "Car"See also: VariantMatrixToStringMatrix Function (inverse)
StringVectorToVariantVector FunctionrTo: Dynamic array of Variants that will be dimensioned with two dimensions before it receives copy of each of the elements in vFm.
Copyright © 1999-2005 Entisoft