主题：请问如何在textbox的textchanged设置筛选代码

请问如何在textbox的textchanged设置筛选代码

Tables("花名册").filter = "[姓名] Like '*" & e.sender.text & "*' Or [职称] Like '*" & e.sender.text & "*'"

还要定义有.sender.text吗？

本身这个控件的事件 使用 e.sener 就能获取本身这个控件 

还有问题，就是为何我一点击窗口中的表就没数据显示，点击textbox就显示呢

不是很理解你的意思上个例子看看,是否你在离开焦点事件上设置了代码.

就是为何我一点击窗口中的表就没数据显示，点击textbox就显示呢
此主题相关图片如下：qq图片20130914114112.jpg

上例子

根据图片，显示因为的你Text设置了默认值“请输入姓名或职称进行查询”。
这样改代码：
 
Dim tx As String = e.Sender.Text
if tx > "" AndAlso tx.StartsWith("请输入") = False then
    Tables("花名册").filter = "[姓名] Like '*" & tx & "*' Or [职称] Like '*" & tx & "*'"
end if