Foxtable(狐表)用户栏目专家坐堂 → [求助]关联表报表


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

主题:[求助]关联表报表

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


加好友 发短信
等级:超级版主 帖子:109720 积分:558310 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2016/10/17 16:46:00 [显示全部帖子]

去掉分组条件
 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:数据表.xls



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


加好友 发短信
等级:超级版主 帖子:109720 积分:558310 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2016/10/17 17:16:00 [显示全部帖子]

 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:数据表.xls


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


加好友 发短信
等级:超级版主 帖子:109720 积分:558310 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2016/10/17 21:55:00 [显示全部帖子]


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


加好友 发短信
等级:超级版主 帖子:109720 积分:558310 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2016/10/17 22:40:00 [显示全部帖子]

drs重复定义了3次

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


加好友 发短信
等级:超级版主 帖子:109720 积分:558310 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2016/10/17 22:42:00 [显示全部帖子]

Dim drs As List(Of DataRow)
drs = r.DataRow.GetChildRows("受力结构件")
Dim rc As DataRow
For Each dr As DataRow In drs
    rc = dr.Clone
    rc("出厂编号") = name
Next
drs = r.DataRow.GetChildRows("零部件")
For Each dr As DataRow In drs
    rc = dr.Clone
    rc("出厂编号") = name
Next
drs = r.DataRow.GetChildRows("安全保护装置")
For Each dr As DataRow In drs
    rc = dr.Clone
    rc("出厂编号") = name
Next

 回到顶部