vbs写一个程序：输入一串代码，遇到？停止输入。然后计算输入大写字母和小写字母和数字的个数

Question

Dim sum1,sum2,sum3,d
sumone=0
sumtwo=0
sumthree=0
d=""
While d<>"chen"                                            '这里吧"chen"改为"?"，运行时，输入?就会报错，而改成chen，运行输入chen就可以
d=inputbox("请输入一串字符：")
If d>="a" and d<="z" Then
sumone=sumone+1
elseif d>="A" and d<="Z" Then
sumtwo=sumtwo+1
elseif d>="0" and d>="9" Then          '这里运行时输入数字时，次数没加到sumthree里面，而是加在了sumone，为什么
sumthree=sumthree+1 End If
Wend
print "输出小写字母个数为"&sumone
print "输出大写字母个数为"&sumtwo
print "输出数字个数为"&sumthree

Answer 1

elseif d>="0" and d>="9" Then 明显是“逻辑运算符”写错了嘛，应该是用 <=
至于“结束标志”，按理说可以定义任意标志的。
我等下试试用“?”是否真的不可以…………

Answer 2

把这段代码写入 .vbs文件，修正“错误”，
运行进行测试，用“?”作为结束标志是没有问题的。
楼主请仔细检查你的代码输入是否有问题，特别要注意全角、半角的区别。