以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  关于Combobox的用法  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=92327)

--  作者:scofields
--  发布时间:2016/11/1 0:04:00
--  关于Combobox的用法
老师,这段代码如何修改?
Dim cmb1 As WinForm.ComboBox
Dim cmb2 As WinForm.ComboBox
cmb1 = e.form.Controls("ComboBox1")
cmb2 = e.form.Controls("ComboBox2")
cmb1.ComboList = DataTables("T_客户").SQLGetComboListString( "客户ID")
cmb2.Combolist =  DataTables("T_B客户").SQLGetComboListString("二类客户名","[客户ID] = ‘’" & cmb1.text  & "" )

--  作者:有点青
--  发布时间:2016/11/1 8:42:00
--  
Dim cmb1 As WinForm.ComboBox
Dim cmb2 As WinForm.ComboBox
cmb1 = e.form.Controls("ComboBox1")
cmb2 = e.form.Controls("ComboBox2")
cmb1.ComboList = DataTables("T_客户").SQLGetComboListString("客户ID")
cmb2.Combolist =  DataTables("T_B客户").SQLGetComboListString("二类客户名","[客户ID] = \'" & cmb1.text  & "\'")

--  作者:有点蓝
--  发布时间:2016/11/1 9:21:00
--  
ComboBox1这个时候未必有值的,ComboBox2的操作就有点多余了

ComboBox2的处理应该放到ComboBox1的textchanged或者selectedindexchanged中

--  作者:scofields
--  发布时间:2016/11/1 15:28:00
--  
看了帮助文件,要放到ComboBox控件的Enter事件中,问题已解决了!