Foxtable(狐表)用户栏目专家坐堂 → [求助] 表复选框选中行,从表A复制到表B,假定结构一样


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

主题:[求助] 表复选框选中行,从表A复制到表B,假定结构一样

美女呀,离线,留言给我吧!
KWK001
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:幼狐 帖子:110 积分:1417 威望:0 精华:0 注册:2016/8/17 12:49:00
[求助] 表复选框选中行,从表A复制到表B,假定结构一样  发帖心情 Post By:2020/5/9 12:59:00 [只看该作者]

用表左边行号的复选框,选中行,要从表A复制到表B,假定结构一样,代码如何写呢?

 回到顶部
帅哥,在线噢!
有点蓝
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:111393 积分:567029 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2020/5/9 13:43:00 [只看该作者]


For Each r As Row In Tables("表A").GetCheckedRows
    Dim dr2 As DataRow = DataTables("表B").AddNew()
    
For Each dc As DataCol in DataTables("表B").DataCols
        dr2(dc.Name) = r(dc.name)
    
Next
Next

 回到顶部