主题：求助：关于复选框多个选择

      我在一个窗口中有两个副本table，我希望在副本“出库主表”中选定若干个  行，然后在  副本“出库明细表”上显示选定的“出库主表”的行，

     我在窗口中增加了一个button 控件，写了如下代码：

但是，出库明细表只显示了最后  勾选复选框的  明细。。

代码我肯定写错了，请指导

dim ids as string

For Each r As Row In Tables("货物发车_出库主表").GetCheckedRows()

        ids = ids & ",'" & r("出库单号") & "'"

Next

Tables("货物发车_出库明细表").Filter = "出库单号 in (" & ids .trim(",") & ")"