Aus Combobox in Listbox

DrHonigtau

Erfahrenes Mitglied
Hi,

bin relativ neu in Sachen VB und wusste daher nicht genau wonach ich im Internet und hier suchen sollte. Die Ergebnisse die ich bekommen hab, waren völlig nutzlos.

Mein "Problem":

Ich hab eine Combobox mit Inhalt, eine Listbox und 2 Commandbuttons.
Wenn ich auf Button1 klicke sollte der Inhalt, der gerade in der Combobox ausgewählt ist in die Listbox übernommen werden.
Wenn ich auf Button2 klicke sollte der ausgewählte Inhalt der Listbox wieder entfernt werden.

Ich weiß bzw. vermute, dass ich mit listindex und additem arbeiten muss, jedoch bin ich noch nicht drauf gestoßen was ich noch benötige, damits funkt

mfg
Dr.
 
Das ist ganz einfach:

Command1 soll der Button sein, der den Text von der ComboBox1 in die List1 (Listbox) überträg:
Code:
Private Sub Command1_Click()
	Me.List1.AddItem Me.Combo1.Text
End Sub

Command2 soll der button sein, der den ausgewählten Eintrag in der List1 wieder entfernt:
Code:
Private Sub Command2_Click()
	If Me.List1.ListIndex >= 0 Then
		Me.List1.RemoveItem Me.List1.ListIndex
	Else
		MsgBox "Bitte Eintrag auswählen!"
	End If
End Sub
 
Zurück