以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  求 克隆多行功能...  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=7537)

--  作者:卟离卟弃
--  发布时间:2010/7/7 9:42:00
--  求 克隆多行功能...
如题。。。谁有此功能的代码?如何写?
--  作者:狐狸爸爸
--  发布时间:2010/7/7 10:24:00
--  

克隆选定的多行:

 

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


--  作者:blackzhu
--  发布时间:2010/7/7 10:38:00
--  
学习?
--  作者:卟离卟弃
--  发布时间:2010/7/7 10:43:00
--  
谢狐爸。为什么狐表程序文件中没有?觉得可以加进吧
--  作者:狐狸爸爸
--  发布时间:2010/7/7 10:58:00
--  
没必要加进去的,个性化的东西,自己设计更好