主题：提示除以0

Select Case e.DataCol.Name
    Case "报关数量","报关金额"
                     If e.DataRow.IsNull("报关数量") OrElse e.DataRow.IsNull("报关金额")
                e.DataRow("单价")= Nothing
            Else
                
                    e.DataRow("单价") = round2(e.DataRow("报关金额") / e.DataRow("报关数量"),4)
                            End If
        End Select

 

报关金额或报关数量输入0，总是提示除以0错误。不知道如何修改代码才不会提示？？？

如果报关数量是0，就把单价和报关金额变为0.

    Case "报关数量","报关金额"
                     If e.DataRow.IsNull("报关数量") OrElse e.DataRow.IsNull("报关金额") orelse e.DataRow("报关数量")=0
            Else

表格里，比如报关数量等于100，单价1，报关金额100，现在我发现报关金额不是100，要改为200，我先把100用键盘是的DELETE删除100，这时报关金额就是空了，此时会提示尝试除以0。如果避免出现这个提示？，当然选中后直接输入200，就不会提示。

数学老师有没有教过您0不能做除数？