以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  复制当前行到一个新表  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=79537)

--  作者:fntfgz
--  发布时间:2016/1/4 15:38:00
--  复制当前行到一个新表
我的项目中有一个表,我选中一行,然后点“复制此行到新表中”按钮,想把当前行复制到一新表去,新表命令为a,请问这个“复制此行到新表中”按钮中的代码怎么写,自己调试了挺长时间也没有成功,拜托啦
--  作者:大红袍
--  发布时间:2016/1/4 15:40:00
--  
Dim nr As Row = Tables("表B").addnew
Dim cr As Row = Tables("表A").current
nr("第一列") = cr("第一列")
nr("第二列") = cr("第二列")