| 以文本方式查看主题 - Foxtable(狐表) (http://foxtable.net/bbs/index.asp) -- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2) ---- [求助]选择行时点击按钮剪切到另一个表 (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=84962) |
| -- 作者：mmxq1111 -- 发布时间：2016/5/13 21:57:00 -- [求助]选择行时点击按钮剪切到另一个表 比如有一个窗口里的表，选中其的一行时，点击窗口中的按钮会剪 切到另一个窗口的表中， |
| -- 作者：Hyphen -- 发布时间：2016/5/14 9:58:00 -- 获取A表当前行，赋值到B表新增行中，删除A表当前行 |
| -- 作者：mmxq1111 -- 发布时间：2016/5/14 13:12:00 -- 大神，能写一下代码不?本人好菜的，谢谢啊 |
| -- 作者：Hyphen -- 发布时间：2016/5/14 14:26:00 -- Dim dr As Row = Tables("表B").AddNew Dim dr1 As Row = Tables("表A").Current If dr1 IsNot Nothing For Each c As Col In Tables("表A").Cols dr(c.Name) = dr1(c.Name) Next dr1.Delete End If
|
| -- 作者：mmxq1111 -- 发布时间：2016/5/14 16:29:00 -- 非常好用，谢谢啊，好崇拜你啊，什么时候我也能出师 |