| admin |  |  | 积分:73146 等级:网站管理员 文数:13451 注册:2004-7-20 |
| ASP把长的数字用逗号隔开显示的代码
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>
|