函数——测试字符串是否完全由数字组成

最新推荐文章于 2024-05-30 20:31:47 发布

gu1dai

最新推荐文章于 2024-05-30 20:31:47 发布

阅读量1.1k

点赞数

CC 4.0 BY-SA版权

分类专栏：研究心得文章标签：测试 function timer

本文链接：https://blog.youkuaiyun.com/gu1dai/article/details/254077

研究心得专栏收录该内容

20 篇文章

订阅专栏

博客展示了一段代码，包含判断一串字符是否全由数字组成的主函数 checknum 及其子函数 check，还使用 timer 函数测试了代码执行时间，最后根据判断结果输出相应信息，属于测试相关内容。

摘要生成于 C知道，由 DeepSeek-R1 满血版支持，前往体验 >

<%
dim a
a="12.8d52d"
'a="25627"
t1=timer()
for j=0 to 10000*1
t=checknum(a,len(a))
next
t2=timer()
response.write "执行时间"&t2-t1&" "

if checknum(a,len(a)) then
response.write "纯正数字"
else
response.write "非纯正数字"
end if

'主函数，判断一串字符是否全由数字组成，调用子函数check判断。
Function checknum(a,g)
for i=1 to g-1
  if check(mid(a,i,1))=false then
   exit for
  end if
next
checknum=check(mid(a,g,1))
End Function
'子函数，判断一个字符是否为数字
Function check(b)
    if instr(1,"0123456789.",b,1)=0 then
     check=false
    else
     check=true
    end if
End Function
%>