Foxtable(狐表)用户栏目专家坐堂 → 请教:在菜单或是窗口增加一个克隆行的按钮,想同时把子表的关联行也同时克隆,该怎样设置错码?


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

主题:请教:在菜单或是窗口增加一个克隆行的按钮,想同时把子表的关联行也同时克隆,该怎样设置错码?

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


加好友 发短信
等级:贵宾 帖子:35433 积分:178524 威望:0 精华:3 注册:2013/3/30 16:36:00
  发帖心情 Post By:2013/12/10 15:34:00 [显示全部帖子]

克隆当前行
同时也利用 GetChildRows 获得所有子表行,然后遍历所有行克隆.

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


加好友 发短信
等级:贵宾 帖子:35433 积分:178524 威望:0 精华:3 注册:2013/3/30 16:36:00
  发帖心情 Post By:2013/12/10 16:11:00 [显示全部帖子]

没搞定就上个例子看看你是如何做的,我再帮你完善.

这个应该没难度的啊.

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


加好友 发短信
等级:贵宾 帖子:35433 积分:178524 威望:0 精华:3 注册:2013/3/30 16:36:00
  发帖心情 Post By:2013/12/10 16:32:00 [显示全部帖子]

Tables("订单").Current.Clone()

Dim drs As List(Of DataRow)
drs = DataTables("订单").DataRows(0).GetChildRows("订单明细")  '你这样不是永远克隆第一行的 子表行了吗?
For Each dr As DataRow In drs
    dr.Clone
Next 

改为
drs = Tables("订单").Current.DataRows.GetChildRows("订单明细")


 回到顶部