ASP把长的数字用逗号隔开显示的代码(点晴MIS系统内部论坛)

网站搜索
搜索范围：搜索方式：关键词(可用空格分开)：

作者及文章信息：

本文热度：81 %

	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>

离线

2022/6/22 0:13:35

本文章共有 0 页, 0 张回文，每页有 10 张回文 >> [ ]

页码：