Foxtable(狐表)用户栏目专家坐堂 → [求助]将表A的所有记录追加到表B相同字段中


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

主题:[求助]将表A的所有记录追加到表B相同字段中

帅哥哟,离线,有人找我吗?
yanxin04
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:婴狐 帖子:94 积分:785 威望:0 精华:0 注册:2012/5/10 14:01:00
[求助]将表A的所有记录追加到表B相同字段中  发帖心情 Post By:2013/3/28 9:45:00 [只看该作者]

想将表A的所有记录追加到表B相同字段中,代码如何编写。

 回到顶部
帅哥哟,离线,有人找我吗?
muhua
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:等待验证 帖子:3855 积分:20692 威望:0 精华:5 注册:2012/6/21 14:03:00
  发帖心情 Post By:2013/3/28 9:54:00 [只看该作者]

用户已被锁定

 回到顶部
帅哥哟,离线,有人找我吗?
狐狸爸爸
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:管理员 帖子:47448 积分:251054 威望:0 精华:91 注册:2008/6/17 17:14:00
  发帖心情 Post By:2013/3/28 10:00:00 [只看该作者]

呵呵,木华代码有个小问题,应该:

 

For Each r As Row In Tables("表A").Rows

    Dim rb As Row = Tables("表B").AddNew()
    For Each c As Col In Tables("表A").Cols        
        rb(c.Name) = r(c.Name)
    Next
Next


 回到顶部
帅哥哟,离线,有人找我吗?
muhua
  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:等待验证 帖子:3855 积分:20692 威望:0 精华:5 注册:2012/6/21 14:03:00
  发帖心情 Post By:2013/3/28 10:04:00 [只看该作者]

用户已被锁定

 回到顶部
帅哥哟,离线,有人找我吗?
yanxin04
  5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:婴狐 帖子:94 积分:785 威望:0 精华:0 注册:2012/5/10 14:01:00
  发帖心情 Post By:2013/3/28 10:09:00 [只看该作者]

谢谢两位帮助

 回到顶部