一个统计问题请教 - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

If e.DataCol.Name = "客户编号" Then

    Dim sum1 As Double = DataTables("订单").compute("sum(金额)","客户编号 = '" & e.DataRow("客户编号") & "'")
    Dim sum2 As Double = DataTables("订单增量").compute("sum(金额2)","客户编号 = '" & e.DataRow("客户编号") & "'")
    Dim sum3 As Double = DataTables("订单").compute("sum(未付金额)","客户编号 = '" & e.DataRow("客户编号") & "'")
    Dim sum4 As Double = DataTables("订单增量").compute("sum(未付金额)","客户编号 = '" & e.DataRow("客户编号") & "'")

    e.DataRow("订单金额合计") = sum1 + sum2
    e.DataRow("未付款合计") = sum3 + sum4

End If

主题：一个统计问题请教