主题：跨表引用数据

这个意思？

Dim fdr As DataRow = DataTables("投标立项").Find("项目名称 = '" & e.DataRow("项目名称") & "'")
If fdr IsNot Nothing Then
    fdr("支出合计") = DataTables("投标支出").Compute("sum(合计)","项目名称 = '" & fdr("项目名称") & "'")
End If