ASP把长的数字用逗号隔开显示

王朝asp·作者佚名  2006-11-24
宽屏版  字体: |||超大  

000000000000000000000000000000000000000000000000000000000000000

<%

Function Comma(str)

If Not(IsNumeric(str)) Or str = 0 Then

Result = 0

ElseIf Len(Fix(str)) < 4 Then

Result = str

Else

Pos = Instr(1,str,".")

If Pos > 0 Then

Dec = Mid(str,Pos)

End if

Res = StrReverse(Fix(str))

LoopCount = 1

While LoopCount <= Len(Res)

TempResult = TempResult + Mid(Res,LoopCount,3)

LoopCount = LoopCount + 3

If LoopCount <= Len(Res) Then

TempResult = TempResult + ","

End If

Wend

Result = StrReverse(TempResult) + Dec

End If

Comma = Result

End Function

%>

<html>

<body>

<%

aLongNumber = "12345678"

%>

An un-formatted number: <%=aLongNumber%><br>

The Comma formatted number: <%=Comma(aLongNumber)%>

</body>

</html>

 
 
 
免责声明:本文为网络用户发布,其观点仅代表作者个人观点,与本站无关,本站仅提供信息存储服务。文中陈述内容未经本站证实,其真实性、完整性、及时性本站不作任何保证或承诺,请读者仅作参考,并请自行核实相关内容。
© 2005- 王朝网络 版权所有