Select Case e.DataCol.name Case "订单数量","备货数量","生产数量" If e.DataRow.Isnull("订单数量") Then e.DataRow("开单平方")=Nothing Else e.DataRow("生产数量")=e.DataRow("订单数量") + e.DataRow("备货数量")
if e.DataRow("平方数") = 0 then
e.DataRow("开单平方")=0
else e.DataRow("开单平方")=(e.DataRow("订单数量") + e.DataRow("备货数量"))/e.DataRow("平方数") end if End If End Select