随机生成一个1~100之间的整数,玩家可以通过函数InputBox命令输入数字来猜测那未知的随机数字

     随机生成一个1~100之间的整数,玩家可以通过函数InputBox命令输入数字来猜测那未知的随机数字，猜对则退出游戏，猜错则提示答案的范围(猜数游戏)，请写出代码：

例如:

        随机数为:60，用户输入20，程序提示"答案范围为:20~100"。

        用户再次输入75，程序提示"答案范围为:20~75"。

        用户再次输入60，程序提示"猜中"，然后退出程序。

 

 

解题思路:

        随机一个数字，范围1-100，然后InputBox输入一个数字，

        然后计算一下这个数字比随机的数字大还是小，如果大，范围就显示1-那个数

        然后继续......直到对为止

代码：

 

        Randomize

        b = int(rnd * 100) + 1

        zuida = 100

        zuixiao=1

        Do

        a=InputBox("请输入猜测的" & zuixiao & "-" & zuida & "数字","猜数游戏")

        a=int(a)

        If a=b then

         MsgBox b & ",恭喜你，答对了"

         ExitScript

        elseif a < b

         zuixiao = a

        else 

         zuida=a

        End if

        

        Loop

        

        

         随机生成一个1~100之间的整数,玩家可以通过函数InputBox命令输入数字来猜测              

   那未知的随机数字，猜对则退出游戏，猜错则提示答案的范围(猜数游戏)

 

 

          1-6级按键认证答案大全下载：

(复制打开→) 
url7.me/S4Vk1