以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  自动筛选  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=60231)

--  作者:方沈
--  发布时间:2014/11/20 15:00:00
--  自动筛选

 

各位大侠:

我在“窗口1”上增加一个“TextBox1”和一个“订单”表

当“TextBox1”中的输入“上海"时,”订单“表中的“地区”列只要是”上海“的行全部显示

 

类似在文本框中输入上海后,点击筛选按钮,这时地区列中只要是上海的全部筛选出来,不同的是,我不想用按钮

 

谢谢

 

并告诉我代码写在哪里?


--  作者:有点甜
--  发布时间:2014/11/20 15:02:00
--  
 代码写到textChanged事件,代码和查询按钮的代码一样。
--  作者:jialihaha
--  发布时间:2014/11/20 15:02:00
--  
在文本框的TextChanged写吧
[此贴子已经被作者于2014-11-20 15:03:08编辑过]

--  作者:方沈
--  发布时间:2014/11/20 15:05:00
--  

能否帮我写一下代码

 

谢谢


--  作者:jialihaha
--  发布时间:2014/11/20 15:09:00
--  
Tables("表名").Filter= “地区 = ” & e.Form.Controls("TextBox1").Text 
--  作者:有点甜
--  发布时间:2014/11/20 15:13:00
--  
 Tables("表A").Filter = "第一列 Like \'%" & e.Sender.Text & "%\'"
--  作者:方沈
--  发布时间:2014/11/20 15:50:00
--  

Tables("表A").Filter = "第一列 Like \'%" & e.Sender.Text & "%\'"

 

上面代码可以筛选表A,但是“窗口1”中的“表A”没有筛选,能否帮我再修改一下

 

谢谢


--  作者:Bin
--  发布时间:2014/11/20 15:52:00
--  
tables("窗口1_Table1").Filter= "第一列 Like \'%" & e.Sender.Text & "%\'"
--  作者:方沈
--  发布时间:2014/11/20 16:24:00
--  

 

还是不行,提示

 

不存在名为“窗口1_Table1”的Table

 

代码写在TextBox1  的TextChanged内


--  作者:有点甜
--  发布时间:2014/11/20 16:27:00
--  

e.Form.Controls("Table1").Table.Filter= "第一列 Like \'%" & e.Sender.Text & "%\'"

[此贴子已经被作者于2014-11-20 16:27:17编辑过]