网络编程
位置:首页>> 网络编程>> Asp编程>> 获取一个数字的个位、十位、百位的函数代码

获取一个数字的个位、十位、百位的函数代码

 来源:asp之家 发布时间:2011-02-20 11:06:00 

标签:个位,十位,百位

代码如下:


Function NumberSplit(num)
Dim i,length
length=Len(num)
For i=1 To length
NumberSplit=NumberSplit & num mod 10 & "," '余数
num = num \ 10 '整除
Next
NumberSplit=Left(NumberSplit,Len(NumberSplit)-1)
End Function

0
投稿

猜你喜欢

手机版 网络编程 asp之家 www.aspxhome.com