主题：关于复选框选定行的问题，老大请指教

你用自带的示例文件测试一下。

在窗口中增加一个table控件，绑定到订单表。

再增加一个table控件。

按钮代码：

Dim gcr As List(of Row) = Tables("订单").GetCheckedRows()
Dim s As String
For Each r As Row In gcr
    s = s & "'" & r("产品") & "',"
Next
Tables("窗口名称_table2").fill("select * from {订单} where 产品 in(" & s.Trim(",") & ")","",False)