获取一个数字的个位、十位、百位的函数代码
更新时间：2010年12月22日 23:04:34 作者：
获取一个数字的个位、十位、百位的代码，需要的朋友可以参考下。
复制代码 代码如下:
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
相关文章
asp下使用数组存放数据的代码...2007-11-11
原理也相对简单，就是利用date函数获取日期，然后通过固定的字符串数组进行替换。2009-02-02
asp论坛在线人数统计研究...2007-03-03
IIS访问ASP页面时报错The requested resource is in use.的解决办法
IIS访问ASP页面时报错The requested resource is in use.的解决办法...2007-04-04
asp按关键字查询XML的问题2008-10-10
使用ASP删除指定IIS站点...2007-01-01
asp #include命令...2007-09-09
最近发现很多同仁对我的网站比较青睐，同事帮我分析网站log时，惊讶的发现：2M的log居然有将近1M都是测试我网站的安全性的，其中至少0.5M的log来自WVS。2010-04-04
使用Flash DownLoad编写采集器(之突破防盗连下载音乐文件)
使用Flash DownLoad编写采集器(之突破防盗连下载音乐文件)...2007-02-02
改善程序性能是一件很微妙的事情。尤其是和INTERNET相关的程序，像ASP程序，制约其性能的因素很多，像 WEB服务器、TCP/IP网络和数据库服务器等。2011-02-02
最新评论