以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  用代码计算后出现“非数字”  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=122363)

--  作者:DLW77
--  发布时间:2018/7/23 22:50:00
--  用代码计算后出现“非数字”
老师,我用下面代码计算0/0后,出现“非数字”,这个代码怎么改才会只出现数字?
Select Case e.DataCol.Name
    Case "品号","单号","单据类型","仓库名称"
        SystemReady = False
        If e.DataRow.IsNull("结存数量") = False Then
            If e.DataRow.IsNull("结存金额") = False Then
                e.DataRow("结存单价") = e.DataRow("结存金额") / e.DataRow("结存数量")
            End If
        End If
        SystemReady = True

End Select

--  作者:有点蓝
--  发布时间:2018/7/23 22:58:00
--  
Select Case e.DataCol.Name
    Case "结存数量","结存数量"
        If e.DataRow("结存数量") <> 0 Then
            e.DataRow("结存单价") = e.DataRow("结存金额") / e.DataRow("结存数量")
        Else
            e.DataRow("结存单价") = 0
        End If
End Select