
专门格式化金钱数的函数,这个函数是专门格式化金钱的,大家可能都知道,在数字为0的时候,我们会发现在显示时会为:.15 元等等,如果为0它会给补0并在后面加两个比整数小一点的00。
<%
Function FormatMoney(Nums)
Num = Nums
If Num = "" Or Num = 0 Then
FormatMoney = "0.00"
Exit Function
Else
tmp0 = CStr(FormatNumber(Num,2))
tmp1 = Left(tmp0,InstrRev(tmp0,".")-1)
tmp2 = right(tmp0,2)
FormatMoney = tmp1&"."&tmp2&""
End If
End Function
%>
测试
<%=FormatMoney("100")%>结果:100.00
呢 称: | |
表 情: | |
内 容: |
评论内容:不能超过 1000 字,需审核,请自觉遵守互联网相关政策法规。 |
验证码: | |
您发布的评论即表示同意遵守以下条款:
一、不得利用本站危害国家安全、泄露国家秘密,不得侵犯国家、社会、集体和公民的合法权益;
二、不得发布国家法律、法规明令禁止的内容;互相尊重,对自己在本站的言论和行为负责;
三、本站对您所发布内容拥有处置权。