title image


Smiley Button zum Löschen von markierten ListBox Items?
Hallo,



ich habe eine Listbox, in der ich mehrere Einträge markieren möchte und diese per Klick auf einen Button löschen möchte.



Hat jemand den Code frü so etwas für mich?

BZW, was ist an meinem Code falsch?



Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click

Dim i As Integer

Dim a As Integer

a = ListBox1.Items.Count

For i = 0 To a - 1

If ListBox1.GetSelected(i) = True Then

ListBox1.Items.Remove(ListBox1.Items(i))

a = a - 1

End If

Next i

End Sub



Ich benutze VB 2005



Danke im voraus!!

geschrieben von

Login

E-Mail:
  

Passwort:
  

Beitrag anfügen

Symbol:
 
 
 
 
 
 
 
 
 
 
 
 
 

Überschrift: