Listbox?

[TheLuCKer]

Hallo Leute,

kann mir jemand sagen, wie ich es schaffe, dass ich einen Eintrag in ner Listbox verschieben kann. Zum Beispiel hab ich folgende Einträge in meiner Listbox:

Hallo 1
Hi 1
Servus 1

Jetzt möche ich, dass wenn ich auf einen Button klicke (Command1), dass es zum Beispiel den dritten Einträg (Servus 1), dass es ihn auf die erste Postion schiebt, Zum Beispiel dann so:

Servus 1
Hallo 1
Hi 1

Also bitte helft mir, echt WICHTIG

LUCKER

 

[wincnc]

Private Sub Command1_Click()
List1.AddItem List1.List(2), 0
List1.RemoveItem 3
End Sub

 

[TheLuCKer]

Danke Geht