国产探花免费观看_亚洲丰满少妇自慰呻吟_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

發表評論 共有條評論
用戶名: 密碼:
驗證碼: 匿名發表
主站蜘蛛池模板： 南江县| 广西| 右玉县| 汕头市| 报价| 大竹县| 木兰县| 泰宁县| 汪清县| 颍上县| 长顺县| 景宁| 临西县| 北安市| 岳西县| 连城县| 蕲春县| 集贤县| 昭苏县| 岳池县| 阿坝| 鹤壁市| 沙湾县| 乐业县| 清新县| 都昌县| 资兴市| 长子县| 花垣县| 宜良县| 景德镇市| 瓮安县| 普洱| 桂林市| 青冈县| 岱山县| 英超| 建昌县| 德保县| 梨树县| 巫山县|