更新时间2018-08-05 10:40:33
dim daan,shuru '输入变量
daan=inputbox("请管理输入一个100以内的数(负数不行)(输错了后果自负)")
msgbox"请管理走开,挑战者上台"
if daan="" then
msgbox"管理什么都没输,我们一起去揍死管理吧":wscript.quit
msgbox"如果出现错误,就是管理输的是字母或者是没输,我们一起去揍死管理,答案在错误报告的string后面(null是没输)",0,"温馨提示" '错误解决
for i = 1 to 10 '限制次数
shuru=inputbox("请输入你猜的100以内的数,只有10次机会") '开始
elseif daan>100 then '检测
msgbox"管理输入的数字不在100以内或者不是数,我们一起去揍死管理吧":wscript.quit
elseif daan<0 then
msgbox"管理输入的数字是负数或者不是数,我们一起去揍死管理吧":wscript.quit
elseif shuru>daan then
msgbox"太大了啦"
elseif shuru<daan then
msgbox"太小了啦"
elseif shuru=daan then
msgbox"你猜对了":wscript.quit
end if
next
msgbox"次数耗尽":wscript.quit
Next 不应该放到最后,应该放到for语句的结束位置。