Foxtable(狐表) → 用户栏目 → 专家坐堂 → 跨表复制数据


  共有3965人关注过本帖树形打印复制链接

主题：跨表复制数据
帅哥哟，离线，有人找我吗？
liuandwang
 小大  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：幼狐 帖子：93 积分：1029 威望：0 精华：0 注册：2018/4/28 23:27:00 		跨表复制数据  发帖心情 Post By：2022/4/24 22:26:00 [只看该作者]

在窗口按钮事件中，将A表多列数据复制到B表一列下
A表：
        编号    尺寸1      尺寸2     尺寸3  ．．．．．．
          1       23           25         28
          2       76           76         80
          3       23           40         45

最终B表效果：
        编号      尺寸
        1           23
        2           76
        3           23
        1           25
        2           76
        3           40
        1           28
        2           80
        3           45


求按钮代码，非常感谢！！！
 回到顶部
帅哥，在线噢！
有点蓝
 小大  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：超级版主 帖子：107850 积分：548607 威望：0 精华：9 注册：2015/6/24 9:21:00 		  发帖心情 Post By：2022/4/24 22:49:00 [只看该作者]

dim nr as row
for each r as row in tables("A表").rows
for each c as col in tables("A表").cols
if c.name like "尺寸*" then
nr = tables("B表").addnew
nr("编号") = r("编号") 
nr("尺寸") = r(c.name) 
end if
next
next
 回到顶部
帅哥哟，离线，有人找我吗？
liuandwang
 小大  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：幼狐 帖子：93 积分：1029 威望：0 精华：0 注册：2018/4/28 23:27:00 		  发帖心情 Post By：2022/4/25 10:49:00 [只看该作者]

还有一个问题：如何排除0值，A表中出现0值的，不复制到B表中

 回到顶部
帅哥，在线噢！
有点蓝
 小大  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：超级版主 帖子：107850 积分：548607 威望：0 精华：9 注册：2015/6/24 9:21:00 		  发帖心情 Post By：2022/4/25 11:13:00 [只看该作者]

if c.name like "尺寸*" and r(c.name) <> 0 then

 回到顶部
RSS2.0 | Xhtml无图版 | Xslt无图版 Copyright © 2000 - 2018 foxtable.com Tel: 4000-810-820 粤ICP备11091905号
   Powered By Dvbbs Version 8.3.0
页面执行时间 0.03516 秒, 4 次数据查询