VB combo控件问题

来源:百度知道 编辑:UC知道 时间:2024/06/22 06:35:28
Combo1.Clear
怎么才能不清除combo1.text,只把list里清除

例如:a=combo1.text
Combo1.Clear
combo1.text=a
不想用这个方法有没有别的比如一个函数什么的 ?? 多谢

没其它办法了!因为clear这个功能就是全清的!
你就写函数

function clearCombo1()
dim a as string
a=combo1.text
combo1.clear
combo1.text=a
end function

真要用的时候就调用一下
clearcombo1

如果combo1比较多时,弄个数组

可改为
function clearCombo1(x as integer)
dim a as string
a=combo1(x).text
combo1(x).clear
combo1(x).text=a
end function

调用时
clearcombo1 index

用Combo1.RemoveItem比较繁琐
你的a=combo1.text
Combo1.Clear
combo1.text=a
这个方法应该是最简单的了

a = Combo1.Text
Combo1.Clear
Combo1.AddItem a
Combo1.ListIndex = 0

Combo1.RemoveItem
把不需要的一个一个删除

没有