以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  跨表统计  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=76491)
--  作者：爱相随
--  发布时间：2015/10/30 11:13:00
--  跨表统计

 下载信息  [文件大小：   下载次数： ]
图片点击可在新窗口打开查看点击浏览该文件:管理项目1.foxdb

老师，我想在《偿债计划表》的“实际偿还金额”统计与《偿还明细表》中“年度”“月份”“批次”“债务项目编码”均相同的偿还金额，请问老师，代码怎么写，谢谢！！
--  作者：爱相随
--  发布时间：2015/10/30 11:16:00
--  

我编写的代码如下，但不得行。

If e.DataCol.Name = "批次" Or e.DataCol.Name = "债务项目编码" Then
    e.DataRow("实际偿还金额") = DataTables("偿还明细表").Compute("Sum(偿还金额)","[债务项目编码] = \'" & e.NewValue & "\'" And "[批次] = \'" & e.NewValue & "\'" )  
End If
--  作者：大红袍
--  发布时间：2015/10/30 11:30:00
--  
Select Case e.DataCol.name
    Case "债务项目编码","批次","年度","月份"
        e.DataRow("实际偿还金额") = DataTables("偿还明细表").Compute("Sum(偿还金额)","[债务项目编码] = \'" & e.DataRow("债务项目编码") & "\' And [批次] = \'" & e.DataRow("批次") & "\' and 年度 = \'" & e.DataRow("年度") & "\' and 月份 = \'" & e.DataRow("月份") & "\'" )
End Select
--  作者：爱相随
--  发布时间：2015/10/30 11:42:00
--  
谢谢大红袍老师。
[此贴子已经被作者于2015/10/30 11:42:07编辑过]