Einer ListBox einen Eintrag an erster Stelle hinzufügen VB-Version:  VB5, VB6
	Views:  469

Wie man einer ListBox Einträge hinzufügt, wurde schon des öfterenbeschrieben: mit List1.AddItem. Allerdings werden diese Einträge generell amEnde der ListBox eingefügt. Was also wenn man immer den neuesten Eintrag anerster Stelle haben möchte? Oder an irgendeiner bestimmten Stelle dazwischen?

Hierzu muss man wissen, dass jeder Eintrag einer ListBox einen Index hat. Dieser Index beginnt beim ersten Eintrag mit 0. Also muss man dem neuen Eintragden entsprechenden Index mitgeben.

Starten Sie ein neues Projekt mit einer ListBox und einem CommandButton. Dannnoch dieser Code:

Private Sub Form_Load()
  ' ListBox mit Einträgen füllen
  List1.AddItem "Eintrag 1"
  List1.AddItem "Eintrag 2"
  List1.AddItem "Eintrag 3"
End Sub
 
Private Sub Command1_Click()
   ' Eintrag an erster Stelle hinzufügen
  List1.AddItem "Eintrag 4", 0
  ' Eintrag an dritter Stelle hinzufügen
  List1.AddItem "Eintrag 5", 2
  ' Eintrag an standardmäßig letzter Stelle hinzufügen
  List1.AddItem "Eintrag 6"
End Sub

Das war's auch schon.