以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  [求助]SQLGetComboListString中IN的用法  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=125257)

--  作者:huangfanzi
--  发布时间:2018/9/24 15:37:00
--  [求助]SQLGetComboListString中IN的用法
_dt生产计划排单 表中有一字段[生产线],其填入的内容为 1,2,3
窗口中有一个Label控件,这个控件的Text为 1 或 2 或 3
现在要对窗口中一个ComboBox生成下拉列表,在ENTER事件中写入代码
下面语句请老师看下:
Dim lb As WinForm.Label = e.Form.Controls("Label_生产线")
e.Sender.ComboList = _dt生产计划排单.SQLGetComboListString("通知单号",“ 此处不会写 ","通知单号")
上面的代码中如何写实现 lb.Text的内容在[生产线]中,也就是 lb.Text IN ("1","2","3")


--  作者:y2287958
--  发布时间:2018/9/24 17:46:00
--  
上例子
--  作者:有点甜
--  发布时间:2018/9/25 9:22:00
--  
Dim lb As WinForm.Label = e.Form.Controls("Label_生产线")
e.Sender.ComboList = _dt生产计划排单.SQLGetComboListString("通知单号", "生产线 like \'%" & lb.text & "%\'","通知单号")

--  作者:huangfanzi
--  发布时间:2018/9/25 20:57:00
--  
老师,我目前用的就是LIKE,但这个不是很好,比如选项列表中存在 1,10,100,如果用LIKE,当用户输入1, 这三个选项都会在列表中,所以,我想用IN的方法
--  作者:有点蓝
--  发布时间:2018/9/25 21:33:00
--  
e.Sender.ComboList = _dt生产计划排单.SQLGetComboListString("通知单号", "生产线 = \'" & lb.text & "\'","通知单号")
--  作者:有点甜
--  发布时间:2018/9/26 9:12:00
--  
以下是引用huangfanzi在2018/9/25 20:57:00的发言:
老师,我目前用的就是LIKE,但这个不是很好,比如选项列表中存在 1,10,100,如果用LIKE,当用户输入1, 这三个选项都会在列表中,所以,我想用IN的方法

 

Dim lb As WinForm.Label = e.Form.Controls("Label_生产线")
e.Sender.ComboList = _dt生产计划排单.SQLGetComboListString("通知单号", "\',\' + 生产线 + \',\' like \'%," & lb.text & ",%\'","通知单号")