以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  克隆行问题  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=107093)

--  作者:jackchan120925
--  发布时间:2017/9/21 10:43:00
--  克隆行问题
老师请问下,我希望在附件所示窗口中增加一个按钮,点击后能把选中的所有订单克隆,这个该如何利用系统命 Syscmd.Row.Clone() 来实现呢,谢谢
图片点击可在新窗口打开查看此主题相关图片如下:12121212121.png
图片点击可在新窗口打开查看

--  作者:有点甜
--  发布时间:2017/9/21 11:10:00
--  

参考代码

 

Dim t As Table= e.Form.Controls("Table1").Table
For Each r As Row In t.rows
    If r("选择") = True Then
        Dim nr As Row = t.AddNew
        For Each c As Col In t.cols
            nr(c) = r(c)
        Next
        nr("选择") = False
    End If
Next