我用vbs编了一个函数,代码在下面：

来源：学生作业帮编辑：灵鹊做题网作业帮分类：综合作业时间：2024/05/30 20:30:33

我用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啊!

主要问题在于你的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

翻译这个vbs代码___________________________________________________ 数学6174黑洞问题,我用C++编的代码,请问谁知道我哪里错了激光干涉仪补偿我用G代码编的太累了求给我一个简单点的程序X轴500 Y轴350不要 G1X5F3500G04P5000 vbs解释代码麻烦详细的解释一下这个是干什么用的编代码用英语怎么说应该怎么做我运行了一个vbs文件内容是“do msgbox "You are foolish!" loop” 在mathematica中我在一张图表中画了好几个曲线,我想在下面加上一个图示来说明下哪条曲线是对应哪个函数? 谁帮我编个故事.在下面词语中任选三个,创编一则小故事,试着说明一个简单的道理.内容完整,中心突出! 一个词的温暖拯救读后感,我只要50字就够了文章在下面英语翻译代码在下面越具体越好谁帮我做一下下面这个函数的求导,结果已经在下面了,请写出具体过程. 怎么在VB中求和我是想编一个简单计算器,编到求和这块不太会了,下面是我写的代码,麻烦帮我想一下Sub op()T1.En