以文本方式查看主题 -  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp) --  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2) ----  [求助]求助只显示勾选复选框行  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=136411)

--  作者：湛江智 --  发布时间：2019/6/12 19:18:00 --  [求助]求助只显示勾选复选框行 如题

--  作者：有点蓝 --  发布时间：2019/6/13 8:49:00 --   如： Dim t As Table = Tables("表A") For Each r As Row In t.GetCheckedRows     str &= r("_Identify") & "," Next t.Filter = "[_Identify] in (" & str.trim(",") & ")"