Gets the array of the "ReturnArray" object.

Syntax:

 
GetArray(Array As Variant)
Parameters: Array Array where the array data of the "ReturnArray" object will be saved.
Example: 
' in a class module "EventClass"

Dim WithEvents App As Application

Private Sub App_BeforeFillTextTableView(Project As TranslationProject, 
ProjectFile As ProjectFile, TransUnitNodeNumberArray As ReturnArray, 
Done As ReturnBoolean)

Dim TUNodeNoArray() As Variant
Dim TU As TransUnit
Dim i As Integer
    
Call TransUnitNodeNumberArray.GetArray(TUNodeNoArray)
    
' fill source text array
For i = 0 To UBound(TUNodeNoArray)
    Set TU = ProjectFile.GetTransUnit(TUNodeNoArray(i))
    If (Not (TU.Target = "")) Then
        TUNodeNoArray(i) = -1
    End If
Next i
    
Call TransUnitNodeNumberArray.SetArray(TUNodeNoArray)
    
Done.Value = True
End Sub
Remarks: The array must be of the type "Variant" and must be a dynamic array with no dimension.

See also:

Class ReturnArray

Last Updated: 04/27/05