listbox og combobox

hvorfor virker dette ikke:

List1.RemoveItem List1.ListIndex
Combo1.RemoveItem List.ListIndex

jeg har en listbox, en combobox, et tekstfelt og 2 commandsbuttons.

Private Sub Command1_Click()
List1.AddItem Text1.Text
Combo1.AddItem Text1.Text
Text1.Text = ""
End Sub

Første knap virker godt, men anden knap virker ikke:
Private Sub Command2_Click()
On Error GoTo fejl
List1.RemoveItem List1.ListIndex
Private Sub Command2_Click()
List1.RemoveItem List1.ListIndex
Combo1.RemoveItem List.ListIndex
End Sub

hvorfor kan man ikke sige:
Combo1.RemoveItem List.ListIndex