Foxtable(狐表)用户栏目专家坐堂 → [讨论]如何只显示复选框选中的行


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

主题:[讨论]如何只显示复选框选中的行

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


加好友 发短信
等级:三尾狐 帖子:615 积分:5246 威望:0 精华:0 注册:2022/4/4 14:42:00
[讨论]如何只显示复选框选中的行  发帖心情 Post By:2023/6/6 19:28:00 [只看该作者]

有一个datatables("A")
主窗口  为tables("A")
在这个窗口中,我用复选框的形式,选中了10行

还有一个弹出窗口,绑定了表A,是副本
这个窗口中,我只想显示选中的那10行

tables("窗口_tables1").filter = " 复选框选中的那10行" ?

请问这里该怎么写代码


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


加好友 发短信
等级:超级版主 帖子:107852 积分:548617 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2023/6/6 20:40:00 [只看该作者]

Dim s As String = ""
For Each r As Row In Tables("表A").GetCheckedRows
    s = s & "," & r("_Identify")
Next
If s > "" Then
    s = s.Trim(",")
    Tables("窗口_tables1").Filter = "[_Identify] in (" & s & ")"
End If

 回到顶部