以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  如果取值进行筛选  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=24741)

--  作者:a6931628
--  发布时间:2012/10/22 14:05:00
--  如果取值进行筛选

如果选取在DropDownOpened窗单中的值,进行筛选表中内容

比如,用模糊查询的方法,得到DropDownOpened中的单位名称,然后把表中对应单位名称的行出来


--  作者:lin_hailun
--  发布时间:2012/10/22 14:17:00
--  
 在事件里写代码

 Dim val As String = e.Form.DropDownBox.Text
 Tables("表").Filter = "第一列 like \'*" & val & "*\'"

--  作者:a6931628
--  发布时间:2012/10/22 14:30:00
--  
Dim txt As String ="南宁广拓"
txt = "\'*" & txt & "*\'"
Tables("返修资料").Filter = "购买单位 like " & txt
这样就行

Dim txt As String =e.Form.DropDownBox.Value
txt = "\'*" & txt & "*\'"
Tables("返修资料").Filter = "购买单位 like " & txt
这样执行不了
DropDownBox窗口中的值,怎样写出来

--  作者:狐狸爸爸
--  发布时间:2012/10/22 14:32:00
--  

Dim txt As String =e.Form.DropDownBox.Value

 

改为:

 

Dim txt As String =e.Form.DropDownBox.Text


--  作者:a6931628
--  发布时间:2012/10/22 14:33:00
--  

Dim txt As String =e.Form.DropDownBox.Text
txt = "\'*" & txt & "*\'"
Tables("返修资料").Filter = "购买单位 like " & txt
这样执行不了

这样也试过了,不行


--  作者:狐狸爸爸
--  发布时间:2012/10/22 14:35:00
--  

做个简单的例子发上来,我们帮你看看。


--  作者:a6931628
--  发布时间:2012/10/22 14:36:00
--  
我是通过button,按扭触发筛选查询,各位老大帮看看
--  作者:lin_hailun
--  发布时间:2012/10/22 15:12:00
--  
 用Button触发查询,就不能按照上面那样取值。

 直接用Forms("").Controls("").Text取吧。

--  作者:a6931628
--  发布时间:2012/10/22 15:34:00
--  
谢谢, 楼上的解答,成功了