vbs小游戏（猜字谜）

先创一个文本文档粘贴下文并保存

randomize '重置数字
a=int(rnd*10)'生成0到10的随机数字
do
b=inputbox("猜个数字吧")
if int(b)>a then
msgbox"大了"
end if
if int(b)<a then
msgbox"小了"
end if
if int(b)=a then
msgbox"你猜对了"
exit do
end if
loop

再将后缀改为vbs就可以了