改进一下asp自带的formatNumber函数

asp的formatNumber再处理类似25/5的值时,结果是5.00处理类似28/8的值时,结果是3.50 改进一下,去掉没用的0让结果分别是5和3.5 复制代码 代码如下: Functionfm(nb) IfIsNumeric(nb)Then Dima a=FormatNumber(nb,2,-1) IfRight((a+''),2)=00Then fm=CLng(a) Else fm=FormatNumber(nb,1,-1) Endif Else fm=0 Endif EndFunct

作者: 来源: 时间: 17-11-23 15:08:36

asp的formatNumber再处理类似 25/5的值时,结果是 5.00  处理类似 28/8的值时,结果是3.50 
改进一下,去掉没用的0  让结果分别是 5和3.5
复制代码 代码如下:
Function fm(nb)
If IsNumeric(nb) Then
Dim a
a=FormatNumber(nb,2,-1)
If Right((a+""),2)=00 Then
fm=CLng(a)
Else
fm=FormatNumber(nb,1,-1)
End if
Else
fm=0
End if
End Function



11
22
33
隐藏区块

会员注册

本功能为预留功能,暂不支持注册 ^_^

Login

社交帐号登陆

使用以下任意帐号可登陆本站

Close section
Close

联系我们

关于5UCMS 您有任何需求 均可以留言给我们