dim dr as datarow = e.datarow
If dr("采购单价") IsNot Nothing And dr("采购金额") Is Nothing Then
dr("采购金额") = dr("采购数量") * dr("采购单价")
ElseIf
dr("采购单价") IsNot Nothing And dr("采购金额") IsNot Nothing Then
dr("采购单价") = dr("采购金额") / dr("采购数量")
Else
dr("采购单价") = dr("采购金额") / dr("采购数量")
End If
[此贴子已经被作者于2017/2/21 17:54:39编辑过]