獲取一個(gè)數(shù)字的個(gè)位、十位、百位的函數(shù)代碼
更新時(shí)間:2010年12月22日 23:04:34 作者:
獲取一個(gè)數(shù)字的個(gè)位、十位、百位的代碼,需要的朋友可以參考下。
復(fù)制代碼 代碼如下:
Function NumberSplit(num)
Dim i,length
length=Len(num)
For i=1 To length
NumberSplit=NumberSplit & num mod 10 & "," '余數(shù)
num = num \ 10 '整除
Next
NumberSplit=Left(NumberSplit,Len(NumberSplit)-1)
End Function
相關(guān)文章
asp實(shí)現(xiàn)本周的一周時(shí)間列表的代碼
原理也相對(duì)簡單,就是利用date函數(shù)獲取日期,然后通過固定的字符串?dāng)?shù)組進(jìn)行替換。2009-02-02
IIS訪問ASP頁面時(shí)報(bào)錯(cuò)The requested resource is in use.的解決辦法
IIS訪問ASP頁面時(shí)報(bào)錯(cuò)The requested resource is in use.的解決辦法...2007-04-04
使用Flash DownLoad編寫采集器(之突破防盜連下載音樂文件)
使用Flash DownLoad編寫采集器(之突破防盜連下載音樂文件)...2007-02-02

