以文本方式查看主题

-  Foxtable(狐表)  (http://www.foxtable.com/bbs/index.asp)
--  专家坐堂  (http://www.foxtable.com/bbs/list.asp?boardid=2)
----  [HELP ] 想在己 筛选 的表中的结果, 再进行二次筛选  (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=125148)

--  作者:terry123e
--  发布时间:2018/9/20 21:30:00
--  [HELP ] 想在己 筛选 的表中的结果, 再进行二次筛选
你好老师,

要求: 在己筛选 的表中的结果中,  再进行二次筛选   。。。 但是入了 下边的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

--  作者:有点甜
--  发布时间: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