Hallo,
ich möchte aus einer Listbox mehrere Einträge selektieren können und diese löschen. Dies sieht im moment so aus :
<PRE>
Dim count as integer
count=ListBox2_selection.Items.Count
If ListBox1.Count > 0 Then
For i = 0 To Count - 1
If ListBox1.Items(i).Selected Then
Dim loeschen As String = ListBox1.Items(i).Value
ListBox1.Items.Remove(loeschen)
End If
Next
</PRE>
Wenn z.B 2 Einträge selektiert sind,kommt beim zweiten Durchlaufen der Schleife eine Fehlermeldung ausgegeben.
Fehlermeldung: Der Index liegt außerhalb des gültigen Bereichs. Der Index darf keine negative Zahl und muss kleiner als die Auflistungsgröße sein. Parametername: index
Danke für die Hilfe
ich möchte aus einer Listbox mehrere Einträge selektieren können und diese löschen. Dies sieht im moment so aus :
<PRE>
Dim count as integer
count=ListBox2_selection.Items.Count
If ListBox1.Count > 0 Then
For i = 0 To Count - 1
If ListBox1.Items(i).Selected Then
Dim loeschen As String = ListBox1.Items(i).Value
ListBox1.Items.Remove(loeschen)
End If
Next
</PRE>
Wenn z.B 2 Einträge selektiert sind,kommt beim zweiten Durchlaufen der Schleife eine Fehlermeldung ausgegeben.
Fehlermeldung: Der Index liegt außerhalb des gültigen Bereichs. Der Index darf keine negative Zahl und muss kleiner als die Auflistungsgröße sein. Parametername: index
Danke für die Hilfe
Comment