主题：跨表统计数据

代码放在哪个事件的？事件的完整代码发上来看看

参考：http://www.foxtable.com/webhelp/topics/1522.htm

Dim d1  As  DataRow = e.DataRow
Select Case e.DataCol.Name
    Case  "入库码单号"
       d1("码单重量") = DataTables("入库明细码单").Compute("Sum(码单重量)","[入库码单号] = '" & d1("入库码单号") & "'")       
    End  Select

请上传实例说明

我测试没有问题。是点击编辑按钮新增的码单表的行吗？有没有码单编号？

是在10楼项目测试，还是在自己的项目测试的？注意码单表的datacolchanged事件代码改了

删除了。把您数据库的用户米密码改了吧

加Then 和不加 意思是一样，这个不可能会影响代码的执行

ElseIf e.DataCol.Name = "码单重量"  Then
    Dim dr As  DataRow
    dr =  DataTables("入库明细").Find("[入库码单号] = '" & e.DataRow("入库码单号") &  "'")
    If dr IsNot Nothing Then
        DataTables("入库明细").DataCols("入库码单号").RaiseDataColChanged(dr )
    End If
End  If