没其它办法了!因为clear这个功能就是全清的!你就写函数function clearCombo1()dim a as stringa=combo1.textcombo1.clearcombo1.text=aend function真要用的时候就调用一下clearcombo1如果combo1比较多时,弄个数组可改为 function clearCombo1(x as integer)dim a as stringa=combo1(x).textcombo1(x).clearcombo1(x).text=aend function调用时clearcombo...