我用vbs编了一个函数,代码在下面:
Function prc(a)
b=0123456789abcdefghijklmnopqrstuvwxyzABCDEFGHIJKLMNOPQRSTUVWXYZ
c=len(a)
for i=1 to c
d=mid(a,i,i)
for j=1 to 36
f=mid(b,j,j)
if d=f Then
g=1
exit for
else
g=0
end if
next
if g=0 Then
prc=false
exit function
end if
next
prc=true
exit function
end function
函数的功能是检查字符串是不是数字和字母组成的,如过有其他字符,返回值就是false,否则就是true,怎么我怎么输返回值都是false啊!
我用vbs编了一个函数,代码在下面:
答案:1 悬赏:80 手机版
解决时间 2021-07-19 07:15
- 提问者网友:焚苦与心
- 2021-07-18 15:32
最佳答案
- 五星知识达人网友:洎扰庸人
- 2021-07-18 16:24
主要问题在于你的mid函数用错了
Function prc(a)
b=0123456789abcdefghijklmnopqrstuvwxyzABCDEFGHIJKLMNOPQRSTUVWXYZ
c=len(a)
for i=1 to c
d=mid(a,i,1)
for j=1 to 62
f=mid(b,j,1)
if d=f Then
g=1
exit for
else
g=0
end if
next j
if g=0 Then
prc=false
exit function
end if
next i
prc=true
exit function
end function
我要举报
如以上问答信息为低俗、色情、不良、暴力、侵权、涉及违法等信息,可以点下面链接进行举报!
大家都在看
推荐资讯