一. 原是自定义列表项目的删除方法:
e.Form.Controls("ComboBox1").ComboList = ""
二.如原是来源于数据表的方法:
Dim cmb As WinForm.ComboBoxcmb = Forms("窗口1").Controls("ComboBox1")cmb.DisplayMember = "" '设置显示列cmb.ValueMember = "" '设置取值列cmb.DataSource = "" '列表项