主题：[求助]代码统计子表金额

老师 ，不用表达式，如何用代码统计父表行对应的子表关联行的数据。谢谢！  父表A,金额 列 是子表B 金额列的和

Select Case e.DataCol.Name
    Case "金额"         
        Dim drs As List(of DataRow) = e.DataRow.GetChildRows("表B") '获得该行所有明细
        Dim val As Double
        For Each dr As DataRow In drs
            If dr IsNot Nothing Then
                val =   如果 val = val + dr("金额") ，要是表B有修改，val 会重复统计。
            End If
        Next
        e.DataRow("金额") = val
End Select

无论从那个方面来说，这个时候，用表达式是最好的，

如果不用表达式，参考：

http://www.foxtable.com/help/topics/1454.htm

http://www.foxtable.com/help/topics/1472.htm

谢谢狐爸！

两个表，收费登记表（父表）和收费明细（子表），通过“科室单号”关联。明细表中的金额是一个表达式，单价* 数量，收费登记表中的金额是一个表达式  Sum(Child(收费登记明细).金额)

在统计时明细表只有10000行，统计收费登记表的月收费情况时，好慢，耗时25秒。所以才用代码的。在帮助中有一节“表达式列的影响”有解决办法，看过没试过。是不是收费登记表afterload 同步加载代码有哦问题：

If DataTables("收费登记表").DataRows.Count = 0 Then '如果订单表没有数据
    DataTables("收费明细").LoadFilter = "科室单号 Is Null" '不加载订单明细
Else
    Dim ids As String
    For Each dr As DataRow In DataTables("收费登记表").DataRows
        ids = ids & ",'" & dr("科室单号") & "'"
    Next
    ids= ids.Trim(",")
    DataTables("收费明细").LoadFilter = "科室单号 In (" & ids & ")"
End If
DataTables("收费明细").Load()