小白求问!!combo控件怎么去除重复行啊
vb吧
全部回复
仅看楼主
level 1
柒十一🌛 楼主
小白求问!!combo控件怎么去除重复行啊[泪][泪][泪]
2020年08月19日 08点08分 1
level 15
比起去掉,一个更好的办法是添加时就避免将重复项添加进去
2020年08月19日 08点08分 2
谢谢!
2020年08月19日 12点08分
level 10
Dim i, j As Long
' 假设Combo控件的名称为Combo1
For i = 0 To Combo1.ListCount - 1
For j = 0 To Combo1.ListCount - 1
If Combo1.List(i) = Combo1.List(j) And Not i = j Then
Combo1.RemoveItem i
End If
Next j
Next i
2020年08月19日 09点08分 3
可以让j从i+1开始循环,保证i不会等于j,并且应该删除编号为j的项(即始终删除后面的项);另外,外层i不应该用For循环,因为For循环的循环次数是固定的,即使删除了列表项,循环次数也不会相应减少,最后会出错的,应该改用While或Do循环
2020年08月19日 09点08分
不仅外层不能用For循环,内层也不可以;但是如果改成从下往上倒着循环,那么用For循环也是可以的
2020年08月19日 09点08分
2020年08月19日 10点08分
谢谢!!
2020年08月19日 12点08分
level 9
添加前去掉好
2020年08月20日 03点08分 4
1