VB菜鸟提问??

来源：百度知道编辑：UC知道时间：2024/05/29 17:22:01

刚刚看了一道例题,是关于城市的选择:
Private Sub cbocity_Click()
txt1.Text = cbocity.Text
End Sub

Private Sub cmdadd_Click()
cbocity.AddItem (cbocity.Text)
txt1.Text = cbocity.Text
End Sub

Private Sub cmddel_Click()
cbocity.RemoveItem (cbocity.ListIndex)
txt1.Text = ""
End Sub
它提示说"cbocity.RemoveItem cbocity.ListIndex"这里有问题.
请各位帮忙一下~~~谢谢~~~

Private Sub cmddel_Click()
If cbocity.ListIndex >= 0 Then
cbocity.RemoveItem (cbocity.ListIndex)
txt1.Text = ""
End If
End Sub

改一下,因为当你没有在下拉框里选择内容,而直接点击删除按钮时,会因为cbocity.ListIndex值为-1,而造成删除错误的.

vb编程(菜鸟提问) VB菜鸟提问?? VB菜鸟提问??? 关于VB编程的问题（菜鸟提问，高手回答）关于VB一个简单的小程序，菜鸟提问菜鸟提问菜鸟提问!!! 菜鸟提问! 菜鸟提问? 菜鸟提问 :)