专门格式化金钱数的函数，这个函数是专门格式化金钱的，大家可能都知道，在数字为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
您发布的评论即表示同意遵守以下条款:
一、不得利用本站危害国家安全、泄露国家秘密,不得侵犯国家、社会、集体和公民的合法权益;
二、不得发布国家法律、法规明令禁止的内容;互相尊重,对自己在本站的言论和行为负责;
三、本站对您所发布内容拥有处置权。
苏公网安备 32070502010230号