- Foxtable(狐表) (http://foxtable.com/bbs/index.asp)
-- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2)
---- 如何两表列相加 (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=146797)
-- 发布时间：2020/3/2 18:05:00
-- 如何两表列相加
如何把AB两个表各相加赋予到C统计表下，以附件
-- 发布时间：2020/3/2 20:03:00
--
请正确上传附件：http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&Id=78
如果一次上传不成功，重复多试几次
-- 发布时间：2020/3/3 18:48:00
-- 如何两表列相加
如何两表列相加
-- 发布时间：2020/3/3 20:41:00
--
怎么个加法？在哪里加？最好截图举例说明
-- 发布时间：2020/3/5 8:48:00
--
在C统计表输入工单2020030201后，如何把A、B两表的所有坑点列和，赋予到C统计表的坑点列上
此主题相关图片如下：qq截图20200305084609.jpg
-- 发布时间：2020/3/5 11:09:00
--
参考：http://www.foxtable.com/webhelp/topics/1472.htm
-- 发布时间：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
-- 发布时间：2020/3/5 17:31:00
--
不管多少个表都一样，相加不就行了
-- 发布时间：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
-- 发布时间：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