专家坐堂-有没有一种写法，可以先过滤Table中的复选框，再过滤FilterFoxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  有没有一种写法，可以先过滤Table中的复选框，再过滤Filter  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=95202)

--  作者：白面书生
--  发布时间：2017/1/12 22:28:00
--  有没有一种写法，可以先过滤Table中的复选框，再过滤Filter
比如现在某个Table已经被选中部分行

Dim rs As List(of Row) = Tables("统计人员表").GetCheckedRows()

但又想在这基础上实现

Tables("统计人员表").Filter = \'表达式\'

--  作者：有点色
--  发布时间：2017/1/12 23:14:00
--

Dim idxs As String = "-1,"
For Each r As Row In Tables("统计人员表").GetCheckedRows()
    idxs = idxs & r("_Identify") & ","
Next

Tables("统计人员表").Filter = "_Identify in (" & idxs.trim(",") & ") and 你的表达式"