此主题相关图片如下:1.png
此主题相关图片如下:2.png
Select Case e.DataCol.name
Case "客户简称","月份","运输方式"
If e.DataRow.IsNull("运输方式") Then
e.DataRow("进口开piao") = DataTables("成本明细").Compute("sum(费用合计)","[客户简称]= '" & e.DataRow("客户简称") & "' and [月份]= '" & e.DataRow("月份") & "'" )
Else
e.DataRow("进口开piao") = DataTables("TAKATA成本").Compute("sum(费用合计)","[客户简称]= '" & e.DataRow("客户简称") & "' and [月份]= '" & e.DataRow("月份") & "' and [运输方式]= '" & e.DataRow("运输方式") & "'" )
End If
End Select
被引用表确认有该名称的列