Foxtable(狐表)用户栏目专家坐堂 → 如何两表列相加


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

主题:如何两表列相加

帅哥,在线噢!
有点蓝
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:110558 积分:562680 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2020/3/2 20:03:00 [显示全部帖子]

请正确上传附件:http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&Id=78

如果一次上传不成功,重复多试几次

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


加好友 发短信
等级:超级版主 帖子:110558 积分:562680 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2020/3/3 20:41:00 [显示全部帖子]

怎么个加法?在哪里加?最好截图举例说明

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


加好友 发短信
等级:超级版主 帖子:110558 积分:562680 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2020/3/5 11:09:00 [显示全部帖子]


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


加好友 发短信
等级:超级版主 帖子:110558 积分:562680 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2020/3/5 17:31:00 [显示全部帖子]

不管多少个表都一样,相加不就行了

e.
DataRow("数量") = DataTables("A表").Compute("Sum(数量)","[产品] = '" & e.NewValue & "'") + DataTables("B表").Compute("Sum(数量)","[产品] = '" & e.NewValue & "'")

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


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

A\B表代码
Select Case e.DataCol.Name
    Case "坑点","黑点"
       Dim pr As DataRow
        pr = DataTables("统计").Find("工单号 = '" & e.DataRow("工单号") & "'")
        If pr Is Nothing Then
            pr = DataTables("统计").addnew
pr("工单号") = e.DataRow("工单号")
        End If
DataTables("统计").DataCols("工单号").RaiseDataColChanged(pr)
End Select

 回到顶部