主题：[求助]订单金额代码如何写

请问大虾：总表中订单金额等于明细表订单金额合计的代码如何写？

下载信息  [文件大小：   下载次数： ]

点击浏览该文件:销售管理.table

参考DataTable的Compute吧，不难的
自己动手好啊，呵呵

自己在明细表中写的如下代码只能在明细记录为单笔记录时正确，超过单笔总表不能显示明细记录的合计值，请老师们指点一下
If e.DataCol.Name = "销售金额"
    Dim drs As List(Of DataRow) = DataTables("三级订单总表").Select("[订单单号] = '" & e.DataRow("订单单号") & "'")
    For Each dr As DataRow In drs
        dr("订单金额") =e.DataRow("销售金额")   这句代码有问题吧，如果改呢
 Next
End If

If e.DataCol.Name = "销售金额"
    Dim dr As DataRow = DataTables("三级订单总表").Find("[订单单号] = '" & e.DataRow("订单单号") & "'")
    if dr isnot nothing then
           dr("订单金额") = DataTables("明细表").Compute(sum("销售金额") ，"[订单单号] = '" & e.DataRow("订单单号") & "'")
   end if
End If

谢谢！如下代码通过
If e.DataCol.Name = "销售金额"
    Dim drs As List(Of DataRow) = DataTables("三级订单总表").Select("[订单单号] = '" & e.DataRow("订单单号") & "'")
    For Each dr As DataRow In drs
        dr("订单金额") = DataTables("三级订单明细").Compute("sum(销售金额)" ,"[订单单号] = '" & e.DataRow("订单单号") & "'")
    Next
End If

自己动手出来了，恭喜你，呵呵