最新下载
热门教程
- 1
- 2
- 3
- 4
- 5
- 6
- 7
- 8
- 9
- 10
判断数字是否整形
时间：2022-07-02 23:01:57 编辑：袖梨 来源：一聚教程网
function isInteger(para)
on error resume next
dim str
dim l,i
if isNUll(para) then
isInteger=false
exit function
end if
str=cstr(para)
if trim(str)="" then
isInteger=false
exit function
end if
l=len(str)
for i=1 to l
if mid(str,i,1)>"9" or mid(str,i,1)<"0" then
isInteger=false
exit function
end if
next
isInteger=true
if err.number<>0 then err.clear
end function
相关文章
- z-libirary软件-强大功能与独特特点 02-28
- 漫蛙manwa2最新版本下载官方正版入口-下载安装教程及常见问题解答 02-28
- 羞羞漫画-官网快捷入口 02-28
- Deepseek网页版-Deepseek云端入口 02-28
- 蛙漫app下载安装包最新版-安卓苹果都能用的官方正式版 02-28
- 推特网页版极速体验-twitter网页流畅访问 02-28