哪位大师帮忙看一下，我的代码错在哪了？
Dim dr1 As DataRow = e.DataRow
Select Case e.DataCol.Name
Case "收款合计","预付合计","入库合计","fa piao合计","返款合计"
If dr1.IsNull("收款合计") OrElse dr1.IsNull("预付合计") OrElse dr1.IsNull("入库合计") OrElse dr1.IsNull("fa piao合计") OrElse dr1.IsNull("返款合计") Then
dr1("预付余额") = Nothing
dr1("入库余额") = Nothing
dr1("fa piao余额") = Nothing
dr1("返款余额") = Nothing
Else
dr1("预付余额") = dr1("收款合计") - dr1("预付合计")
dr1("入库余额") = dr1("预付合计") - dr1("入库合计")
dr1("fa piao余额") = dr1("入库合计") - dr1("fa piao合计")
dr1("返款余额") = dr1("收款合计") - dr1("返款合计")
End If
End Select
加好友 
发短信
Post By：2016/11/9 16:20:00 [只看该作者]
