Foxtable(狐表)用户栏目专家坐堂 → [HELP ] 想在己 筛选 的表中的结果, 再进行二次筛选


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

主题:[HELP ] 想在己 筛选 的表中的结果, 再进行二次筛选

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


加好友 发短信
等级:婴狐 帖子:43 积分:405 威望:0 精华:0 注册:2018/3/18 13:11:00
[HELP ] 想在己 筛选 的表中的结果, 再进行二次筛选  发帖心情 Post By:2018/9/20 21:30:00 [只看该作者]

你好老师,

要求: 在己筛选 的表中的结果中,  再进行二次筛选   。。。 但是入了 下边的CODE  便以下边的条件重新筛选 ,第一次筛选的结果没有了。请问如何解决? 谢谢

Dim txt As String = e.Form.Controls("TextBox1").Text
Dim tbl As Table = Tables("POS_TRANSACTION")
If txt = "" Then
    tbl.Filter = ""
Else
    txt = "'%" & txt & "%'"
    tbl.Filter = "item_cdesc Like " & txt 
End If

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


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

Dim txt As String = e.Form.Controls("TextBox1").Text
Dim tbl As Table = Tables("POS_TRANSACTION")
If txt = "" Then
    tbl.Filter = ""
Else
    txt = "'%" & txt & "%'"
    tbl.Filter = iif(tbl.filter>"", "(" & tbl.filter & ") and ", "") & "item_cdesc Like " & txt 
End If

 回到顶部