[點(diǎn)晴永久免費(fèi)OA]asp下返回以千分位顯示數(shù)字格式化的數(shù)值
<%
'****************************** '函數(shù)：comma(str) '參數(shù)：str，待處理的數(shù)字 '作者：阿里西西 '日期：2007/7/12 '描述：返回以千分位顯示數(shù)字格式化的數(shù)值 '示例：<%=comma("120300")%> '****************************** 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 %> 該文章在 2022/6/22 0:40:14 編輯過 |
關(guān)鍵字查詢
相關(guān)文章
正在查詢... 
|
400 186 1886
