改进一下asp自带的formatNumber函数
2016-02-19 10:06
下面是个改进一下asp自带的formatNumber函数教程，撑握了其技术要点，学起来就简单多了。赶紧跟着图老师小编一起来看看吧！
改进一下,去掉没用的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
