|
Public Function CopyVariantMatrix( _
ByRef rTo() As Variant _
, ByRef vFm() As Variant _
) As Boolean rTo vFm
+----+----+----+ +----+----+----+
| 12 | 34 | WV | <-- | 12 | 34 | WV |
+----+----+----+ +----+----+----+
| 21 | 43 | CA | | 21 | 43 | CA |
+----+----+----+ +----+----+----+Example: Assuming
Static avarIn(0 To 45, 0 To 12) As Variant
avarIn(1, 1) = "Smith"
Dim avarOut() As Variant
for example
CopyVariantMatrix(avarOut(), avarIn()) = TrueSee also: CopyVariantMatrixDirect Function (direct-copy version)
CopyVariantArray Function (more flexible version)
CopyVariantVector Function (for one-dimensional arrays)
CopyVariantCube Function (for three-dimensional arrays)rTo: Destination array that will receive a copy of array vFm. This function will attempt to re-dimension rTo so that it has the same dimensions as vFm. It will ignore errors during that re-dimension so that rTo can be a Static array. If rTo is Static, it must be two-dimensional and have the same upper and lower bounds as vFm. Copyright © 1999-2005 Entisoft