共2 条记录, 每页显示 10 条, 页签:
[1]
[浏览完整版]
标题：怎样用代码为ComboBox控件增加一条列表记录
1楼
tongke 发表于：2018/1/25 14:05:00Dim cj As WinForm.ComboBox = e.Form.Controls("厂家筛选")
cj.ComboList = DataTables("出库主表").GetComboListString("订单客户","已对账 = false")
用上面的代码给“厂家筛选”赋值后，还想再增加一条记录“全部”，之前用Powerbuilder编程时，列表框控件有一个函数additem，可以单独加记录，但在Foxtable里面好像没有，怎么实现上面的功能。
此主题相关图片如下：列表.jpg
[此贴子已经被作者于2018/1/25 14:05:44编辑过]
2楼
tongke 发表于：2018/1/25 14:55:00自己搞定了，只需要在原有列表值后面加一句：& "|全部"，就可以了。修改后如下：
Dim cj As WinForm.ComboBox = e.Form.Controls("厂家筛选")
cj.ComboList = DataTables("出库主表").GetComboListString("订单客户","已对账 = false") & "|全部"
通过仔细看教程，发现ComboList的Items是字符集合，表示所有的自定义列表项目。
那么就可以用集合的方法来操作了：
cj.ComboList.Items.add("全部")
还可以插入：
cj.ComboList.Items.Insert(0,"全部")
区别是一个在末尾，一个在第一个。
[此贴子已经被作者于2018/1/25 16:18:58编辑过]
共2 条记录, 每页显示 10 条, 页签:
[1]