Question

vb6的combo控件怎么删除里面的内容

画面上有一个 text框，一个button，一个combo
combo里有abcd四个选择，现在我想在text框里输入b在点button，combo里面b的选择就删除

我用combo的removeitem 老是提示类型错误，请问vb里面combo只能按照数字删除吗？不能按照内容删除吗

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

Private Sub Form_Load()
Combo1.AddItem ("a")
Combo1.AddItem ("b")
Combo1.AddItem ("c")
Combo1.AddItem ("d")
Combo1.ListIndex = 0

End Sub

Answer 1

不好意思 才发现，之前的代码错误很大
你怎么没补充提问一下呢：）
现在完全改好了
--------------------------------------------

我用combo的removeitem 老是提示类型错误，请问vb里面combo只能按照数字删除吗？不能按照内容删除吗

不能

可以这样实现：
Private Sub Command1_Click()

i = 0

Do
If Combo1.List(i) = Text1.Text Then
Combo1.RemoveItem i
Else
i = i + 1
End If
Loop Until i > Combo1.ListCount - 1

Text1.Text = ""
End Sub

Private Sub Form_Load()
Combo1.AddItem ("a")
Combo1.AddItem ("b")
Combo1.AddItem ("c")
Combo1.AddItem ("d")
Combo1.AddItem ("a")
Combo1.ListIndex = 0

End Sub

Answer 2

好方法。