vb@rchiv
VB Classic
VB.NET
ADO.NET
VBA
C#
Erstellen von dynamischen Kontextmen?s - wann immer Sie sie brauchen!  
 vb@rchiv Quick-Search: Suche startenErweiterte Suche starten   RSS-Feeds  | Impressum  | Datenschutz  | vb@rchiv CD Vol.6  | Shop Copyright ©2000-2021
 
zurück
Rubrik: TextBox, ListBox & ComboBox01.05.02
Aktuell markierten List-Eintrag löschen

VB-Version:  VB5, VB6
 Views:  13.384 

Um Einträge in einer ListBox zu löschen benötigen Sie die RemoveItem-Methode.

Zum Testen erstellen Sie ein neues Projekt, auf die Form kommt eine ListBox (List1) sowie ein CommandButton (Command 1). Nun der benötigte Code:

Private Sub Form_Load()
  ' ListBox mit Einträgen füllen
  Dim i As Integer
 
  For i = 1 To 10
    List1.AddItem "Eintrag " & CStr(i)  
  Next i
End Sub
Private Sub Command1_Click()
  Dim Index As Integer
 
  With List1
    Index = .ListIndex
    If Index >= 0 Then
      ' Eintrag löschen
      .RemoveItem Index
 
      ' automatisch nachfolgenden Eintrag markieren
      If Index > .ListCount - 1 Then Index = .ListCount - 1
      .ListIndex = Index
    End If
  End With
End Sub

Diese Seite wurde bereits 13.384 mal aufgerufen.

nach obenzurück
 
   

Druckansicht Druckansicht Copyright ©2000-2021 vb@rchiv Dieter Otter
Alle Rechte vorbehalten.
Microsoft, Windows und Visual Basic sind entweder eingetragene Marken oder Marken der Microsoft Corporation in den USA und/oder anderen Ländern. Weitere auf dieser Homepage aufgeführten Produkt- und Firmennamen können geschützte Marken ihrer jeweiligen Inhaber sein.

Diese Seiten wurden optimiert für eine Bildschirmauflösung von mind. 1280x1024 Pixel