Public Function SetVariantVector( _ ByRef rIn() As Variant _ , ByVal v1Dim As Variant _ , ByVal vValue As Variant _ ) As Boolean
rIn(v1Dim) = vValueExample:
Assuming Dim avarData() As Variant ReDim avarData(0 To 5) for example SetVariantVector(10, "RE") = TrueSee also:
SetVariantMatrix Function SetVariantCube Function ReDimPreserveVariantVector FunctionrIn: One-dimensional array of Variant values. rIn must already be dimensioned before it is passed to this function or else an error will occur. rIn should be dynamic because this function will attempt to redimension the array if necessary so that the specified element can be set.
Copyright © 1999-2005 Entisoft