dim d as double = DataTables("材料明细").Compute("Sum(入仓金额)",s1))
if d > 0
dr("本月入仓_金额") = Round2(DataTables("材料明细").Compute("Sum(入仓金额)",s1)),2)
else
dr("本月入仓_金额") =
end if
DataTables("材料明细").Compute("Sum(入仓金额)",s1))由于条件s1的原因,有可能统计得到的是一个null值。