combox 内容删除问题

[hraymond]

看了http://community.csdn.net/Expert/topic/3267/3267793.xml?temp=.6728174，试了试
发现我在使用Combo1.RemoveItem (Combo1.ListIndex)时报错“无效的过程调用和参数”，请问是什么问题呢？

[tztz520]

要手动选择一个项

[hraymond]

我的想法是重绘combox，先将过去添加的内容全部删除，再AddItem新选项目。不知道这样的思路可行吗，有没有更好的方法呢？

[hraymond]

有什么办法可以根据数据库内的数据记录更改，动态改变combox内的选项

[hraymond]

帮忙看一下啊

[tmd007]

Private Sub Command1_Click()
If a >= 0 And a < Combo1.ListCount Then
Combo1.RemoveItem a
End If
End Sub

[viena]

将内容全部删除用Combo1.Clear

[ec_figo]

1.用 Combo1.Clear 清除所有内容
2.用 循环 从数据库中取出数据再用 Combo1.AddItem 重新添加选项
3.设 Combo1.ListIndex=0,选定第一项
==完毕==

[tztz520]

'没有选择项就出错

Private Sub Command1_Click()
If Combo1.ListIndex >= 0 Then
Combo1.RemoveItem (Combo1.ListIndex)
End If
End Sub

[hraymond]

加如了if语句但是不满足条件不执行Combo1.RemoveItem (Combo1.ListIndex)，但是我的combox内是有选项的

[hraymond]

明明combox中有内容，为什么Combo1.ListIndex的结果为-1呢？

[aliang_2008]

Combo1.ListIndex的结果为-1 表示当前没有选择项目