Die Attributfunktion SortIndirect sortiert die Liste über eine Hilfsfunktion.
Syntax | ||||
SortIndirect(SortMethodName) | ||||
Rückgabewert | ||||
Kein | ||||
Parameter | ||||
Verwendung |
Name |
Typ |
Übergabe |
Beschreibung |
Erforderlich |
SortMethodName |
String |
ByVal |
Name einer Hilfsfunktion zur Sortierung. Die Funktion muss sich in derselben Klasse befinden. |
Die SortIndirect-Funktion erlaubt u.a. die Sortierung von Objektlisten. Legen Sie hierzu eine Hilfsfunktion zur Sortierung an:
Function SortFunc(ByVal P1 As "Auto", ByVal P2 As "Auto") As Long
If P1.Modellname > P2.Modellname Then
SortFunc := 1
ElseIf P1.Modellname = P2.Modellname Then
SortFunc := 0
Else
SortFunc := -1
End If
End Function
Die Funktion muss über zwei Parameter verfügen. Der Typ der Parameter kann frei gewählt werden, muss jedoch bei beiden Parametern gleich sein. Der Rückgabetyp muss Long sein.
Die Funktion muss
1. Einen Wert 1 oder -1 liefern, wenn die zu überprüfenden Parameter verschieden sind
2. Einen Wert 0 liefern, wenn beide zu überprüfenden Parameter identisch sind
Wird der Wert 1 zurückgegeben, wenn P1 > P2 ist, wird die Liste aufsteigend sortiert
Wird der Wert -1 zurückgegeben, wenn P1 > P2 ist, wird die Liste absteigend sortiert
Die Sortierung wird aufgerufen über:
Auto.SortIndirect("SortFunc")