主题：行复制

窗口1 -里有一个 表A绑定

窗口2 -里面有一个表B绑定

当在 窗口1里 双击 某行，  某行的值-复制到 窗口2里的表里  并且关掉窗口1

这样的效果怎么整内?   

Dim rlist As List(Of Row) = Tables("快速查找商品_Table1").GetCheckedRows()

Tables("新增订单_Table1").Rows(0).Delete()

For i As Integer = 0 To rlist.Count - 1

    Dim r As Row = Tables("新增订单_Table1").AddNew()

    r("商品名") = rlist(i)("商品名")

Next

写成这样了  ，可以是可以，  但我想要的是  不要复选， 每次只能 复制一行，·· 帮我改改被...