主题：怎样将表中的数据添加到组合框中

怎样将表中某个字段不重复的数据添加到ComboBox组合框中

参考：http://www.foxtable.com/webhelp/scr/0925.htm

已经绑定字段怎么设置一下组合框取消重复值呢？

不能使用绑定。请使用2楼的用法

Dim cmb As WinForm.ComboBox

这样用不可能有重复的。如果有，说明数据里有看不见的空格或者其它字符

哦，谢谢！

如果窗体中有很多“ComboBox1"控件需要分别绑定不同字段用什么语句呢？

Dim cmb As WinForm.ComboBox
If  cmb = Forms("机具资料入库窗体").Controls("jijuleixingCombo ")   Then
    cmb.ComboList = DataTables("机具信息表").GetComboListString("机具类型")
Else If  cmb = Forms("机具资料入库窗体").Controls("suoshucangkuCombo")  Then
    cmb.ComboList = DataTables("仓库资料").GetComboListString("仓库名称")
End If
这样运行不了报错

Dim cmb As WinForm.ComboBox = Forms("机具资料入库窗体").Controls("jijuleixingCombo ")

运行时出错

Dim cmb As WinForm.ComboBox =  Forms("机具资料入库窗体").Controls("suoshucangkuCombo")
cmb.ComboList = DataTables("仓库资料").GetComboListString("仓库名称")

cmb  = Forms("机具资料入库窗体").Controls("kehuxingmingCombo")
cmb.ComboList = DataTables("客户资料").GetComboListString("客户姓名")

cmb= Forms("机具资料入库窗体").Controls("jijuxinghaoCombo")
cmb.ComboList = DataTables("机具信息表").GetComboListString("机具型号")

cmb = Forms("机具资料入库窗体").Controls("jijuleixingCombo")
cmb.ComboList = DataTables("机具信息表").GetComboListString("机具类型")

cmb = Forms("机具资料入库窗体").Controls("changjiaxingmingCombo")
cmb.ComboList = DataTables("机具信息表").GetComboListString("厂家名称")

cmb  = Forms("机具资料入库窗体").Controls("jijulaiyuanCombo")
cmb.ComboList = DataTables("供应商资料").GetComboListString("供应商名称")

cmb = Forms("机具资料入库窗体").Controls("jijusuoshujigouCombo")
cmb.ComboList = DataTables("代理商资料表").GetComboListString("代理商机构名称")

cmb = Forms("机具资料入库窗体").Controls("jijusuoshujigongfuzerenCombo")
cmb.ComboList = DataTables("代理商资料表").GetComboListString("代理商负责人姓名")

 

 

 

 

此主题相关图片如下：123.png


此主题相关图片如下：124.png