以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  设计下拉窗口  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=51888)

--  作者:asionwong
--  发布时间:2014/6/5 9:42:00
--  设计下拉窗口

2、将窗口的DropDownOpened事件代码设置为:

Dim txt As String = e.Form.DropDownBox.Text
Dim
tbl As Table = Tables("窗口1_Table1")
If
txt = "" Then
   
tbl.Filter = ""
Else

    txt =
"\'%" & txt & "%\'"
    tbl.Filter =
"客户ID Like " & txt & " Or 公司名称 Like " & txt & " Or 地址 Like " & txt & " Or 联系人 Like " & txt
End
If
e.Form.DropDownBox.
Select()

下拉框打开的时候,能够通过客户ID、公司名称、地址、联系人等模糊筛选,现在希望不仅能够按上面的条件模糊筛选,同时还要求只筛选出列为“显示”被勾选的行,不被勾选的不筛选。

请教怎么做?谢谢

[此贴子已经被作者于2014-6-5 9:47:57编辑过]

--  作者:Bin
--  发布时间:2014/6/5 9:42:00
--  
你的问题是什么?
--  作者:land089
--  发布时间:2014/6/5 11:31:00
--  
在下拉窗口中做!
--  作者:Bin
--  发布时间:2014/6/5 11:34:00
--  
同一个问题不要重复提问 http://www.foxtable.com/bbs/dispbbs.asp?BoardID=2&ID=51889&skin=0