老师能帮忙看看这个吗?就是 当 订单合同表的产信_产品链号列等于订单附表的业务往来_产品链号列就读取变动编号的最大那行的订单核算_售价内容。
现在可以改成是如果订单合同表的产信_产品链号列找不到订单附表的业务往来_产品链号列时,订信_最新售价就输入为0.
If e.DataRow.IsNull("产信_型号")=False Then
Dim dr As DataRow = DataTables("订单合同表").Find("产信_产品链号='" & e.DataRow("产信_产品链号") & "'" ,)
If dr IsNot Nothing Then
dr("订信_最新售价")=DataTables("订单附表").Find("业务往来_产品链号='" & e.DataRow("产信_产品链号") & "'", "变动编号 desc")("订单核算_售价")
End If
End If '得到最后销售价