| 以文本方式查看主题 - Foxtable(狐表) (http://www.foxtable.com/bbs/index.asp) -- 专家坐堂 (http://www.foxtable.com/bbs/list.asp?boardid=2) ---- 复制一行。 (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=72332) |
| -- 作者：cuicuibing -- 发布时间：2015/7/28 14:48:00 -- 复制一行。 建立一个按钮，点击后会复制当前行。 然后在本窗口内，点击另一个按钮，会在当前表内增加一行，把复制的行的内容写入到增加的一行。
|
| -- 作者：cuicuibing -- 发布时间：2015/7/28 14:50:00 -- 我的意思不是复制上一行，而是在不同的表中复制一行。 |
| -- 作者：大红袍 -- 发布时间：2015/7/28 14:53:00 -- 参考 http://www.foxtable.com/help/topics/1533.htm
|
| -- 作者：cuicuibing -- 发布时间：2015/7/28 15:37:00 -- 您好，版主。我的意思是粘贴的talbe2还没有打开。在现在打开的table1中复制一行。打开table1后，点击粘贴，在table1中增加复制的一行。 |
| -- 作者：大红袍 -- 发布时间：2015/7/28 16:07:00 -- 无论什么复制粘贴，都是赋值。
Dim nr As Row = Tables("表A").AddNew |
| -- 作者：大红袍 -- 发布时间：2015/7/28 16:08:00 -- 复制
vars("某行") = Tables("表B").Current
粘贴
Dim nr As Row = Tables("表A").AddNew |
| -- 作者：cuicuibing -- 发布时间：2015/7/28 16:35:00 -- 版主，Dim nr As Row = Tables("表A").AddNew增加我会，能理解。 关键现在理解不了的是下边复制语句的。 复制 vars（“某行”） = tables（“表b”).current 这里的vars（“某行”）是什么意思。 我理解的 复制应该是 定义一个变量 为 row 等于tables（“表b”).current dim vars as row = tables（“表b”).current 但是在 粘贴 按钮中 vars 变量就没有了。
|
| -- 作者：大红袍 -- 发布时间：2015/7/28 16:37:00 -- 直接写
复制
vars("某行") = Tables("表B").Current
粘贴
Dim nr As Row = Tables("表A").AddNew |
| -- 作者：cuicuibing -- 发布时间：2015/7/28 16:39:00 -- 如果将语句写在一个按钮中可以的。 如果在2个按钮中，如何实现 dim vars as row = tables（“表b”).current Dim nr As Row = Tables("表A").AddNew nr（“第一列”） = vars（“第一列”） 。。。。。。。。。。 。。。。。。。。。
|
| -- 作者：大红袍 -- 发布时间：2015/7/28 16:40:00 -- 第一个按钮
vars("某行") = Tables("表B").Current
第二个按钮
Dim nr As Row = Tables("表A").AddNew |