当前位置： >>
用 VB6.0 开发猜数字小游戏首先说一说猜数字这个游戏的玩法，一开始计算机会随机产生一个不重复的四位数， 首先说一说猜数字这个游戏的玩法，一开始计算机会随机产生一个不重复的四位数， 你要输入四位不重复的数与计算机给出的数作对比， 你要输入四位不重复的数与计算机给出的数作对比，如果与计算机给出的数的位置相同数 字相同， 字相同，那么将会是 1A，如果数字相同而位置相不同，将会显示 1B。例如：计算机的随机 ，如果数字相同而位置相不同， 。例如： 数字为： 我猜的数字为： 那么这时计算机会给你提示为： 数字为：1234 ，我猜的数字为：1356 ，那么这时计算机会给你提示为：1A1B，也就是说， ，也就是说， 你猜的数字中，有一位数字是猜对的，而且数字位置都对， 你猜的数字中，有一位数字是猜对的，而且数字位置都对，所以显示为 1A；还有一个数字 ； 也猜对了，但是位置不对， 次数少。 也猜对了，但是位置不对，所以显示为 1B。就这些了，看谁猜的次数少。 。就这些了，看谁猜的次数少控件， 上点击鼠标右键， 首先在 Form 中加入一个 CommandButtion 控件，在 Command1 上点击鼠标右键，选 择复制，在窗体上点击鼠标右键， 择复制，在窗体上点击鼠标右键，选择粘贴在窗体上粘贴出九个 Command1,此时出现对话 此时出现对话 框问你要不要创建控件数组，在此选择是。 控件， 框问你要不要创建控件数组，在此选择是。然后再加入两个 CommandButtion 控件，一个 ListBox、一个 Frame、一个 Label 。设置窗体的 Caption 属性为“猜一猜” BorderStyle 属性为“猜一猜” 、 、 、 为 1－Fixed Single、控件数组的 Captin 分别为 0、1、2、3、4、5、6、7、8、9，Command2 － 、 、、、、、、、、、， 确定&， 取消&， 提示： 的 Caption 为“确定 ，Command3 的 Caption 为“取消 ，Frame1 的 Caption 为“提示： &，Label1 的 Cpation 为“0A0B&。然后选择菜单编辑器编辑菜单为：游戏、新游戏、显示 ， 。然后选择菜单编辑器编辑菜单为：游戏、新游戏、 答案、结束游戏， 属性分别为： 答案、结束游戏，她们的 Name 属性分别为：Game、New、View、End。好了，其余属性 、 、 、 。好了， 使用缺省的即可，最后的界面应跟下图一样： 使用缺省的即可，最后的界面应跟下图一样：以下是程序清单： 以下是程序清单：Dim PcA, PcB, PcC, PcD As Integer '电脑给出的每一位数 电脑给出的每一位数 Dim UserA, UserB, UserC, UserD As Integer '用户输入的每一位数 用户输入的每一位数 Dim Degree As Integer '用户猜了几次 用户猜了几次 Dim Num As Integer '判断用户输入次数的变量 判断用户输入次数的变量 Private Sub Form_Load() '程序运行行时 程序运行行时 '初始化 初始化 For i = 0 To 9 Command1(i).Enabled = False Next i Command2.Enabled = False Command3.Enabled = False View.Enabled = False End Sub Private Sub New_Click() '开始一个新游戏时 开始一个新游戏时 View.Enabled = True '可以看答案 可以看答案 List1.Clear '清空列表框 清空列表框Degree = 0 ' 对随机数生成器做初始化 Randomize Num = 1 Label1.Caption = 0 ＆ “A& ＆ 0 ＆ “B& '电脑给出的每一位数 电脑给出的每一位数 PcA = Int(9 ＊ Rnd) Do PcB = Int(9 ＊ Rnd) Loop While PcB = PcA Do PcC = Int(9 ＊ Rnd) Loop While PcC = PcA Or PcC = PcB Do PcD = Int(9 ＊ Rnd) Loop While PcD = PcA Or PcD = PcB Or PcD = PcC For i = 0 To 9 Command1(i).Enabled = True Next i Command2.Enabled = False Command3.Enabled = True End SubPrivate Sub Command1_Click(Index As Integer) '用户输入时 用户输入时 '使得输入过的按钮无效 使得输入过的按钮无效 If Num &= 4 Then Command1(Index).Enabled = False End If '判断用户输入了几位，如果输入了四位则确认按钮有效 判断用户输入了几位， 判断用户输入了几位 If Num = 4 Then Command2.Enabled = True End If '取得用户输入 取得用户输入 取得用户 Select Case Index Case 0 UserEnter (0) '调用 UserEnter 过程 调用 Case 1 UserEnter (1) Case 2 UserEnter (2) Case 3 UserEnter (3) Case 4 UserEnter (4) Case 5 UserEnter (5) Case 6 UserEnter (6)Case 7 UserEnter (7) Case 8 UserEnter (8) Case 9 UserEnter (9) End Select End Sub Private Sub Command2_Click() '单击确定按钮时 单击确定按钮时 '判断用户输入是否正确 判断用户输入是否正确 Dim A, B As Integer A=0 B=0 Degree = Degree ＋ 1 If UserA = PcA Then A=A ＋ 1 ElseIf UserA = PcB Or UserA = PcC Or UserA = PcD Then B=B ＋ 1 End If If UserB = PcB Then A=A ＋ 1 ElseIf UserB = PcA Or UserB = PcC Or UserD = PcD Then B=B ＋ 1 End If If UserC = PcC Then A=A ＋ 1 ElseIf UserC = PcA Or UserC = PcB Or UserC = PcD Then B=B ＋ 1 End If If UserD = PcD Then A=A ＋ 1 ElseIf UserD = PcA Or UserD = PcB Or UserC = PcC Then B=B ＋ 1 End If '显示提示 显示提示 Label1.Caption = A ＆ “A& ＆ B ＆ “B& List1.AddItem UserA ＆ UserB ＆ UserC ＆ UserD ＆ “ & ＆ Label1.Caption '初始化输入按钮 初始化输入按钮 Command2.Enabled = False For i = 0 To 9 Command1(i).Enabled = True Next i Num = 1 '判断输赢 判断输赢 If A = 4 Then MsgBox “你猜对了！& ＆ “你一共猜了 ＆ Degree ＆ “次& 你猜对了！ 你一共猜了&For i = 0 To 9 Command1(i).Enabled = False Next i Command2.Enabled = False End If End Sub Private Sub Command3_Click() '单击取消按钮时 单击取消按钮时 Num = 1 For i = 0 To 9 Command1(i).Enabled = True Next i Command2.Enabled = False End Sub Private Sub View_Click() '显示答案时 显示答案时 MsgBox “答案是：& ＆ PcA ＆ PcB ＆ PcC ＆ PcD ＆“你答对了吗？& 答案是： 你答对了吗？ End Sub Private Sub End_Click() '游戏结束时 游戏结束时 End End Sub Sub UserEnter(i) '取得用户输入 取得用户输入 If Num = 1 Then UserA = i Num = Num ＋ 1 ElseIf Num = 2 Then UserB = i Num = Num ＋ 1 ElseIf Num = 3 Then UserC = i Num = Num ＋ 1 ElseIf Num = 4 Then UserD = i Num = Num ＋ 1 Else: MsgBox “四位数够了！& 四位数够了！ End If End Sub
滨江学院《Java 程序设计》实习报告题 目 猜数字游戏 专 业 计算机科学与技术 年级班级___大二 1 班___ 学号
王帅飞 ) 陈遥 学生姓...C语言大作业要(猜数字游戏)要求求及设计说明书(初学)_计算机软件及应用_IT/计算机_专业资料。适合初学者,简单明了,纯原创~~!!程序设计说明书姓名:简正聪 班级:...猜数字图文全通关攻略。猜数字游戏策划1、游戏规则由主持人开始,选定一个数字,可写在手机上(只允许自己知道),例如主持人用手机写一个数字“38”,然后主持人按逆...猜​数​字​实​验​报​告​,​比​较​完​善​的​用​户​界​面《程序设计课程设计》 题目: 《猜数字》游戏 物联网工程 ...4.2 功能模块设计 猜数字游戏 游戏说明模块 游戏进入模块 输入输出模块 计时模块 猜数次数模块 成绩判定模块 游戏结束模块 显示规则 记录开始时间 记录结束时间 初始...猜数字游戏(1) 摘要猜 数字游戏是一个运行在 W i n d o w s 平台下的小型游戏软件 ,依据猜数字游戏的基本规则 ,给用户进行成绩排行 ,在排行榜中排 出前...(&cls&); cout&&&猜数字游戏(输入-1 中途退出)&&&//可以让游戏中途退出 d=0;//d 为控制游戏最终判断是否成功及使循环连续的开关 for(i=0;i&4;...看图猜数字_数学_高中教育_教育专区。趣味数学题 30 以内的数字 ER---2 路不拾遗---10 桃园 结义 ---3 食物:15 ,石榴:16 钨丝留一手:546 春夏秋冬 ---...合肥工业大学计算机与信息学院 课程设计报告 设计题目: 学生姓名: 专班学业: 级: 号: 猜数字及生命游戏 李挺 电子信息工程 13 级 1 班
于磊 2014 ...#include &stdio.h& #include
#include &stdlib.h& #define EXIT_SUCCESS 0 #define MANY 4 /*4 位数猜数字*/ #define TIMES_OUT 9 /*9 步以内就要猜...
All rights reserved Powered by
www.tceic.com
copyright &copyright 。文档资料库内容来自网络，如有侵犯请联系客服。当前位置： >
梦幻西游手游图文揭秘开心猜数字玩法攻略
昨日梦幻西游手游测试服优先开放了开心猜数字的玩法，小编晚上也是第一时间进入游戏体验了一翻发现只要掌握了规则玩法还是很简单的，主要就是考验大家的运气，那么下面小编就给大家图文揭秘开心猜数字玩法攻略，还不会玩点小伙伴可以来看看哦。
进入游戏后双方轮流猜数字，在0-999的区间，当轮到你猜的时候上下滑动宠物头像选择对应的数字，根据左下角和右上角的提示可以逐渐缩小范围数字可能的范围。需要注意的有以下几点：
1、开局数字可随意选择，滑动宠物头像选择数字，点击确定后再后面会显示出该数字会与系统最终给出的数字做对比，一般是高和低，高就代表这个数字比要猜的数字要大，小则是同理。至于有没有直接猜中出现相同的情况小编还没有遇到过。
2、由于双方数字是相同的，及时查看我方和对方的数字的区间很重要，可以迅速缩小数字可能出现的区间。
3、玩家也可以点击左边的“...”打字或者说话交流，提醒不会玩的小伙伴。
最后根据我方和对方可能出现数字的区间，进行最后的数字确定。
如上图我方为603-615，对方的数字区间为612-628，由于两方数字猜测都是一样的，所以集合起来数字应该在612-615之间。那么在这个区间输入任意数字就好了。
以上就是梦幻西游手游图文揭秘开心猜数字玩法攻略，大家会了么？
扫一扫，关注265G果粉网官方微信，最新iPhone8资讯抢先看
扫描左侧二维码即可添加265G果粉网官方微信，您也可以在微信公众号上搜索“265G果粉网”，关注后即可每天了解最新iPhone动态。
扫码关注官方微信
获取苹果一手资讯
扫码关注官方微博
获取最新苹果情报
265G推荐游戏二七对比五最多猜数字_百度知道
二七对比五最多猜数字
您的回答被采纳后将获得：
系统奖励15（财富值+成长值）+难题奖励20（财富值+成长值）
我有更好的答案
应该是1、2、27这几个数字
1，2，27等
为您推荐：
其他类似问题
猜数字的相关知识
换一换
回答问题，赢新手礼包
个人、企业类
违法有害信息,请在下方选择后提交
色情、暴力
我们会通过消息、邮箱等方式尽快将举报结果通知您。400 Bad Request
400 Bad Request101个shell脚本 猜数字游戏代码
转载 &发布时间：日 16:20:40 & 投稿：mdxy-dxy
原本书上这个例子是教调试脚本的，它故意给出的脚本中有几个错误，教我们认识系统提示的错误，并修改运行。但比较难写出来，所以把修改好了的脚本放上来，这个脚本比较有趣味的
原本书上这个例子是教调试脚本的，它故意给出的脚本中有几个错误，教我们认识系统提示的错误，并修改运行。但比较难写出来，所以把修改好了的脚本放上来，这个脚本比较有趣味的
# hilow -- A simple number-guessing game
biggest=100
# maximum number possible
# guessed by player
# number of guesses made
number=$(($$ % $biggest))
# random number, between 1 and $biggest
while [ $guess -ne $number ]
echo -n "Guess? " ; read guess
if [ "$guess" -lt $number ] ; then
echo "... bigger!"
elif [ "$guess" -gt $number ] ; then
echo "... smaller!i"
guesses=$(($guesses + 1))
echo "Right!! Guessed $number in $guesses guesses."
#1) number=$(($$ % $biggest)) $$代表执行此shell的pid，因为每次执行shell的pid并不相同， 所以number为1-100的随机数。
#2）$guess -ne $number ，if [ "$guess" -lt $number ]，elif [ "$guess" -gt $number ] ;为判断输入的数字与$number的比较。
#3）整个脚本并不复杂，但逻辑清晰明了，也很有意思。
大家感兴趣的内容
12345678910
最近更新的内容
常用在线小工具}