以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  逐级筛选  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=127100)
--  作者：15528900289
--  发布时间：2018/11/5 16:56:00
--  逐级筛选

老师如何实现逐级筛选

如同组界面的筛选，后一次筛选是在上一次筛选后的数据中进行筛选
--  作者：有点甜
--  发布时间：2018/11/5 18:16:00
--  

 参考代码

 

Dim filter As String = Tables("表A").filter
Dim str As String = "新条件"
filter = iif(filter>"", "(" & filter & ") and ", "") & str
msgbox(filter)