主题：跨表计算（已解决）

采购明细中的已交重量是统计库明细中入库重量怎样写代码

采购明细 DataColChanged

If e.DataCol.Name = "采购重量" Then
    Dim dr As DataRow = DataTables("入库明细").Find("采购ID = '" & e.DataRow("采购ID") & "' and 物资编号 = '" & e.DataRow("物资编号") & "'")
    If dr IsNot Nothing Then
        e.DataRow("已交重量") = dr("入库重量") - e.OldValue + e.NewValue
    End If
End If