共9 条记录, 每页显示 10 条, 页签:
[1]
[浏览完整版]
标题：如何在文本框输入内容后回车就能够筛选.(未解决)
1楼
pc005637 发表于：2011/11/18 11:37:00在菜单中有这样的设计，想输入框中输入内容之后，直接按回车键就可以筛选。
现在我是在输入框的（ChangeCommitted）事件中设置筛选的代码，这样输入数值后，回车，能进行筛选。
但出现一个问题，因为我有很多个表，如果筛选条件一样的话，切换到另外一个表后，回车是不能进行筛选的。
这个应该如何设置代码？在哪个事件中设置才比较好？
| 下载信息 [文件大小： 下载次数： ] | |
 点击浏览该文件:回车得筛选结果.table |
[此贴子已经被作者于2011-11-22 14:26:55编辑过]
2楼
狐狸爸爸 发表于：2011/11/18 11:39:00在MainTablechanged事件设置代码。
3楼
pc005637 发表于：2011/11/18 12:01:00有时切换表时是不需要筛选的啊，如果代码在MainTableChanged的话。。。。
4楼
czy 发表于：2011/11/18 12:04:00那就用Select Case语句对不同的表进行不同的筛选。
5楼
pc005637 发表于：2011/11/18 12:24:00已经用了select case语句进行分类了。只是ChangeCommitted语句是 提交修改后执行，如果只是切换表，没有修改内容的话，相同内容是不会再进行筛选的。我就是想，相同的内容，在Ａ表筛选后，再切换到Ｂ表，也能回车后，直接进行筛选的。就是不知道在哪一个事件中，设置代码。
6楼
狐狸爸爸 发表于：2011/11/18 14:37:00用MainTableChanged事件啊，每次都合成条件：
Select Case MainTable.Name
case “要筛选的表1”,"要筛选的表2","要少选的表3"
Dim flt As string
'合成筛选表达式
MainTable.Filter = flt
End Selec
也可以在ChangeCommitted一次完成筛选：
Dim flt As string
'合成筛选表达式
Tables("SSSS").Filter = flt
Tables("XXXX").Filter = flt
[此贴子已经被作者于2011-11-18 14:37:16编辑过]
7楼
pc005637 发表于：2011/11/22 12:53:00有时候不一定要所有表都需要筛选的
8楼
pc005637 发表于：2011/11/23 17:17:00狐爸爸再看看.
9楼
狐狸爸爸 发表于：2011/11/23 17:43:00| 下载信息 [文件大小： 下载次数： ] | |
 点击浏览该文件:管理项目11.rar |
共9 条记录, 每页显示 10 条, 页签:
[1]