Hur ser koden ut för att ta bort en item i en combobox där väljaren själv kan välja vad han vill ta bort. Jag vet att man kan skriva combo1.removeItem (0) men då försvinner ju bara det översta i comboboxen.

Private Sub Command1_Click()
Dim item As Integer
item = Combo1.ListIndex
Combo1.RemoveItem item
End Sub

Ibbe

eller så kan du slippa extravariabler eftersom de tar onödig tid och bara skriva:

<code>
Private Sub Command1_Click()
Call Combo1.RemoveItem(Combo1.ListIndex)
End Sub
</code>

Listindex returnerar index på den post som för tillfället är markerad.

//Emma

Bör alltid kolla om det är en rad markerad först:

<code>
Private Sub Command1_Click()
If Combo1.ListIndex <> -1 Then
Combo1.RemoveItem Combo1.ListIndex
Else
Msgbox "Ingen post markerad!"
End If
End Sub
</code>