Hallo, ja ich weiß diese Frage schon sau oft gestellt wurde, aber da meine etwas anders ist frag ich einfach nochmal...
Ich habe eine ListBox mit 20 beschriebenen Items und ca 180 leeren Items (diese müssen bleiben da diese später gefüllt werden) wenn ich jetzt mit der einfachsten Methode die Items sortieren will: Eigenschaften -> sorted -> true schiebt es die ganzen leeren Items nach oben was ja auch logisch ist.. ich hätte aber gern nur die beschreibenen oben alp. sortiert und die leeren einfach unten drunter.
Jetzt hatte ich das schon mal mit dieser BubbleSortMethode probiert da kommt mir aber der Fehler "ArgumentOutOfRangeException wurde nicht behandelt
InvalidArgument=Value mit dem Wert 1 ist für index ungültig.
Parametername: index"
Mein Quelltext
Was mache ich falsch?
Ich habe eine ListBox mit 20 beschriebenen Items und ca 180 leeren Items (diese müssen bleiben da diese später gefüllt werden) wenn ich jetzt mit der einfachsten Methode die Items sortieren will: Eigenschaften -> sorted -> true schiebt es die ganzen leeren Items nach oben was ja auch logisch ist.. ich hätte aber gern nur die beschreibenen oben alp. sortiert und die leeren einfach unten drunter.
Jetzt hatte ich das schon mal mit dieser BubbleSortMethode probiert da kommt mir aber der Fehler "ArgumentOutOfRangeException wurde nicht behandelt
InvalidArgument=Value mit dem Wert 1 ist für index ungültig.
Parametername: index"
Mein Quelltext
VB.NET-Quellcode
- Dim schleife1 As Integer
- Dim schleife2 As Integer
- Dim hilfe As String
- cbmitarbeiter.Items.Clear()
- For schleife1 = 1 To 200
- If cbmitarbeiter.Items(schleife1) = "" Then
- For schleife2 = 1 To 200
- hilfe = cbmitarbeiter.Items(schleife2)
- cbmitarbeiter.Items(schleife2) = cbmitarbeiter.Items(schleife2 + 1)
- cbmitarbeiter.Items(schleife2 + 1) = hilfe
- Next
- Else
- If Asc(cbmitarbeiter.Items(schleife1)) = 13 Then
- For schleife2 = 1 To 200
- hilfe = cbmitarbeiter.Items(schleife2)
- cbmitarbeiter.Items(schleife2) = cbmitarbeiter.Items(schleife2 + 1)
- cbmitarbeiter.Items(schleife2 + 1) = hilfe
- Next
- End If
- End If
- Next
Was mache ich falsch?