Dim cmb As WinForm.ComboBoxcmb = Forms("窗口1").Controls("ComboBox1")cmb.ComboList = DataTables("客户").GetComboListString("公司名称")
上述的代码如果设置在窗口的AfterLoad事件中,即可在打开窗口的时候,自动从客户表提取公司名称,作为组合框Combox1的列表项目。
老师,这个代码如何修改能达到效果:CMB列表框能增加显示客户表中的其他列,如电话、联系人等。但最终选择后是以公司名称填入CMB框内的。也不就是说在做选择时要求同时能看见客户表的其他列内容。