国产探花免费观看_亚洲丰满少妇自慰呻吟_97日韩有码在线_资源在线日韩欧美_一区二区精品毛片,辰东完美世界有声小说,欢乐颂第一季,yy玄幻小说排行榜完本

首頁 > 編程 > ASP > 正文

獲取一個數字的個位、十位、百位的函數代碼

2024-05-04 10:59:59
字體：大 中 小
來源：轉載
供稿：網友
復制代碼 代碼如下:
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

發表評論 共有條評論
用戶名: 密碼:
驗證碼: 匿名發表
主站蜘蛛池模板： 竹山县| 砚山县| 鱼台县| 化隆| 江川县| 白水县| 浦城县| 蓬溪县| 建湖县| 湟中县| 保山市| 闸北区| 安阳县| 安徽省| 舟山市| 宿迁市| 贵定县| 江山市| 廉江市| 巴里| 大田县| 合水县| 扎赉特旗| 天门市| 武清区| 金平| 绵竹市| 富平县| 仁化县| 黄梅县| 进贤县| 平凉市| 呈贡县| 磴口县| 恩施市| 汝阳县| 南丰县| 南靖县| 武城县| 鸡泽县| 祁连县|