Foxtable(狐表)用户栏目专家坐堂 → Filter出来的结果修改后会再过滤掉


  共有2079人关注过本帖树形打印复制链接

主题:Filter出来的结果修改后会再过滤掉

帅哥哟,离线,有人找我吗?
蓝蚂蚁
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:三尾狐 帖子:672 积分:7909 威望:0 精华:0 注册:2016/6/11 11:10:00
Filter出来的结果修改后会再过滤掉  发帖心情 Post By:2018/6/6 15:22:00 [只看该作者]

窗口按钮代码:
说明:对窗口1中的副本表进行筛选
Dim str1 As String="江西"
Tables("窗口1_Table1").filter="地点='"&  str1  &"' and 标记=false  and [备注] is null"


问题:当我把筛选出来的数据,在备注列输入内容后,回车,该行马上就隐藏不见了,如何修改代码,使之不再次筛选。

 回到顶部
帅哥哟,离线,有人找我吗?
有点甜
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2018/6/6 15:46:00 [只看该作者]

 Dim str1 As String="江西"
Dim ids = "-1,"
ids = Tables("窗口1_Table1").DataTable.GetComboListString("_Identify","地点='"&  str1  &"' and 标记=false  and [备注] is null")
ids = ids.replace("|", ",").trim(",")
Tables("窗口1_Table1").filter = "_Identify in (" & ids & ")"

[此贴子已经被作者于2018/6/6 15:46:01编辑过]

 回到顶部
帅哥哟,离线,有人找我吗?
蓝蚂蚁
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:三尾狐 帖子:672 积分:7909 威望:0 精华:0 注册:2016/6/11 11:10:00
  发帖心情 Post By:2018/6/6 21:30:00 [只看该作者]


图片点击可在新窗口打开查看此主题相关图片如下:image 1.jpg
图片点击可在新窗口打开查看

提示的错误:语法错误: IN 关键字后面必须是由逗号分隔的非空表达式列表,并且必须用括号括起来。

 回到顶部
帅哥哟,离线,有人找我吗?
有点甜
  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2018/6/6 21:36:00 [只看该作者]

Dim str1 As String="江西"
Dim ids = "-1,"
ids &= Tables("窗口1_Table1").DataTable.GetComboListString("_Identify","地点='"&  str1  &"' and 标记=false  and [备注] is null")
ids = ids.replace("|", ",").
trim(",")
Tables("窗口1_Table1").filter = "_Identify in (" & ids & ")"

[此贴子已经被作者于2018/6/6 21:36:25编辑过]

 回到顶部
帅哥哟,离线,有人找我吗?
蓝蚂蚁
  5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:三尾狐 帖子:672 积分:7909 威望:0 精华:0 注册:2016/6/11 11:10:00
  发帖心情 Post By:2018/6/6 21:59:00 [只看该作者]

谢谢 完美解决

 回到顶部