求助：表与表之间无任何关联，按订单号和工程编号引用统计合同分配明细表中的合同数量，将统计后的合同数量填到订货明细表中相应的行，认为重置合同数量列后无法实现功能。请赐教，感谢！烦将修改的代码贴出，小狗到期。

订货明细表DataColChanged

If e.DataCol.Name = "合同数量" Then
    e.DataTable.ReplaceFor("合同数量", DataTables("合同分配明细表").Compute("Sum(合同数量)","订单号 = \'" & e.DataRow("订单号")  & "\'and 工程编号 = \'" & e.DataRow("工程编号")  & "\' ") )
End If

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

点击浏览该文件:订1_201710071622.zip

1、把你的数据库发上来才能测试；

2、代码改成

 If e.DataCol.Name = "订单号" OrElse e.DataCol.Name = "工程编号" Then
    Dim sum = DataTables("合同分配明细表").Compute("Sum(合同数量)","订单号 = \'" & e.DataRow("订单号")  & "\'and 工程编号 = \'" & e.DataRow("工程编号")  & "\' ")
    e.DataTable.ReplaceFor("合同数量", sum, "订单号 = \'" & e.DataRow("订单号")  & "\'and 工程编号 = \'" & e.DataRow("工程编号")  & "\' ")
End If

可以统计，但数据不对。

 数据库文件：

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

点击浏览该文件:订1.zip

知道了，是条件的错误。