当前位置：主页 > 查看内容

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

发布时间：2021-05-09 00: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 原文链接：http……
复制代码 代码如下:

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

原文链接：https://m.jb51.net/article/25718.htm
本站部分内容转载于网络，版权归原作者所有，转载之目的在于传播更多优秀技术内容，如有侵权请联系QQ/微信：153890879删除，谢谢！
上一篇：asp中获取内容中所有图片与获取内容中第一个图片的代码 下一篇：ASP同一站点下gb2312和utf-8页面传递参数乱码的终极解决方法

推荐图文

  • 周排行
  • 月排行
  • 总排行

随机推荐