主题：求 克隆多行功能...

如题。。。谁有此功能的代码？如何写？

克隆选定的多行：

 

Dim t As Table = Currenttable
For i As Integer = t.TopRow To t.BottomRow
    Dim dr As Datarow = t.Datatable.Addnew()
    For Each c As Col In t.Cols
       dr(c.Name) = t.Rows(i)(c.Name)
    Next
Next

学习?

谢狐爸。为什么狐表程序文件中没有？觉得可以加进吧

没必要加进去的，个性化的东西，自己设计更好