以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  下拉框过滤  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=83696)

--  作者:冰锋
--  发布时间:2016/4/14 17:22:00
--  下拉框过滤

这个是"combobox2"和"combobox3" enter中的代码

Dim cmb As WinForm.ComboBox = e.Sender
Dim str As String = e.Form.Controls("ComboBox1").Value
cmb.ComboList = DataTables("driverinfo").GetComboListString("姓名", "车号 = \'" & str & "\'")

我想实现当"combobox2"选定的"姓名","combobox3"中不再显示,请教大家,"combobox3"过滤条件要怎么写.


--  作者:大红袍
--  发布时间:2016/4/14 17:31:00
--  

Dim cmb As WinForm.ComboBox = e.Sender
Dim str As String = e.Form.Controls("ComboBox1").Value

Dim xms As String = e.Form.Controls("ComboBox2").Value
cmb.ComboList = DataTables("driverinfo").GetComboListString("姓名", "车号 = \'" & str & "\' and 姓名 not in(\'" & xms.Replace(",", "\',\'") & "\')")


--  作者:冰锋
--  发布时间:2016/4/14 17:39:00
--  
谢谢大红袍