如何两表列相加 - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

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

共有3296人关注过本帖树形打印复制链接主题：如何两表列相加

foxuser

小大 1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：幼狐帖子：78 积分：750 威望：0 精华：0 注册：2017/7/19 12:42:00

如何两表列相加 发帖心情

Post By：2020/3/2 18:05:00 [只看该作者]

如何把AB两个表各相加赋予到C统计表下，以附件

有点蓝

小大 2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：超级版主帖子：110563 积分：562705 威望：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

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

foxuser

小大 3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：幼狐帖子：78 积分：750 威望：0 精华：0 注册：2017/7/19 12:42:00

如何两表列相加 发帖心情

Post By：2020/3/3 18:48:00 [只看该作者]

如何两表列相加

有点蓝

小大 4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：超级版主帖子：110563 积分：562705 威望：0 精华：9 注册：2015/6/24 9:21:00

Post By：2020/3/3 20:41:00 [只看该作者]

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

foxuser

小大 5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：幼狐帖子：78 积分：750 威望：0 精华：0 注册：2017/7/19 12:42:00

Post By：2020/3/5 8:48:00 [只看该作者]

在C统计表输入工单2020030201后，如何把A、B两表的所有坑点列和，赋予到C统计表的坑点列上

此主题相关图片如下：qq截图20200305084609.jpg

有点蓝

小大 6楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：超级版主帖子：110563 积分：562705 威望：0 精华：9 注册：2015/6/24 9:21:00

Post By：2020/3/5 11:09:00 [只看该作者]

参考：http://www.foxtable.com/webhelp/topics/1472.htm

foxuser

小大 7楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：幼狐帖子：78 积分：750 威望：0 精华：0 注册：2017/7/19 12:42:00

Post By：2020/3/5 16:42:00 [只看该作者]

想达到效果 C统计表 = A表中的所有工单2020030201的坑点和 + B表中所有工单2020030201坑点和

参考信息只是单表的

If e.DataCol.Name = "产品" Then

e.DataRow("数量") = DataTables("订单").Compute("Sum(数量)","[产品] = '" & e.NewValue & "'")
End If

有点蓝

小大 8楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：超级版主帖子：110563 积分：562705 威望：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 & "'")

foxuser

小大 9楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：幼狐帖子：78 积分：750 威望：0 精华：0 注册：2017/7/19 12:42:00

Post By：2020/3/6 15:45:00 [只看该作者]

统计表行已锁，如何同步A、B表中列数据到统计列

统计代码

If e.DataCol.Name = "工单号" Then

e.DataRow("坑点") = DataTables("A表").Compute("Sum(坑点)","[工单号] = '" & e.NewValue & "'") + DataTables("B表").Compute("Sum(坑点)","[工单号] = '" & e.NewValue & "'")

e.DataRow("黑点") = DataTables("A表").Compute("Sum(黑点)","[工单号] = '" & e.NewValue & "'") + DataTables("B表").Compute("Sum(黑点)","[工单号] = '" & e.NewValue & "'")

End If

A\B表代码

Select Case e.DataCol.Name

Case "坑点","黑点"

Dim pr As DataRow

pr = DataTables("统计").Find("工单号 = '" & e.DataRow("工单号") & "'")

If pr IsNot Nothing Then

DataTables("统计").DataCols("工单号").RaiseDataColChanged(pr)

End If

End Select

有点蓝

小大 10楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：超级版主帖子：110563 积分：562705 威望：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

下一主题 >> << 上一主题

主题：如何两表列相加