Tippseite

VB-Homepage Tipp 260

vereinfachte Listboxcontrols Eintragung

Eigentlich ist dies nur ein ganz simpler Tipp, wie Sie sich etwas Tipparbeit ersparen können. Gewohnter Maßen bekommt ein Listboxcontrol seine Anweisung zum Hinzufügen eines Eintrages mit

List1.AddItem "Das ist mein Eintrag"

Prozeduren sind bekanntlich dazu da, wiederkehrende Aufgaben zu übernehmen, so daß Sie nicht mehrfach definiert werden müssen und genau dies wollen wir uns in diesem Fall zu nutze machen.

Allgemein/Listbox_hinzufügen

Public Sub Listbox_hinzufügen(ListboxName As ListBox, ParamArray Einträge())
'
Dim i As Variant
'
With ListboxName
   .Clear
   For Each i In Einträge
      .AddItem i
   Next
End With
'
End Sub

Wenn Sie nun einen oder mehrere Einträge zur Listbox hinzufügen möchten, können Sie dies mit folgender Anweisung tun.

Listbox_hinzufügen List1, "Visual Basic Homepage", "Tools und Tipps zu VB", "Alles rund um Visual Basic", "Visual Basic - mehr Spaß fürs Geld"

List1 'steht für das Control, daß die Einträge erhalten soll

Alle nachfolgenden durch Hochkomma und Semikolon getrennten Angaben werden als separate Einträge der Listbox hinzugefügt.

Tipp-Download

Quelle : Michael C. Amundsen / mike_tips@amundsen.com