网站已改版，请使用新地址访问：
shuziyouxi VB语言编写的一个猜数字游戏的源码,内容比较简单 就是猜0-100之 任意数 采用了 rnd Game Program
238万源代码下载- www.pudn.com
&文件名称: shuziyouxi
& & & & &&]
&&所属分类:
&&开发工具: Visual Basic
&&文件大小: 27 KB
&&上传时间:
&&下载次数: 2
&&提 供 者:
&详细说明：VB语言编写的一个猜数字游戏的源码,内容比较简单 就是猜0-100之间的任意数 采用了 rnd 随机数-VB language of a guessing game source code, content is relatively simple to guess any number between 0 and 100 using a random number rnd
文件列表(点击判断是否您需要的文件，如果是垃圾请在下面评价投诉):
&&猜数字游戏源码\MSSCCPRJ.SCC&&..............\猜数字游戏.frm&&..............\猜数字游戏.frx&&..............\猜数字游戏.vbp&&..............\猜数字游戏.vbw&&猜数字游戏源码
&输入关键字，在本站238万海量源码库中尽情搜索：
&[] - VC 使用BitButtonNL类模仿金山独霸的界面
&[] - 因为经常看到有小伙伴说自己的手机通讯录不小心删了 没号码了，一时兴起所以做了这个小程序 方便用户查看 使用 （就当是备份吧！）有高人能帮忙解决 一个问题么， 关于C++猜数字游戏（MFC）的一个程序
[问题点数：100分，结帖人gh]
有高人能帮忙解决 一个问题么， 关于C++猜数字游戏（MFC）的一个程序
[问题点数：100分，结帖人gh]
不显示删除回复
显示所有回复
显示星级回复
显示得分回复
只显示楼主
2015年1月 VC/MFC大版内专家分月排行榜第二
2015年9月 VC/MFC大版内专家分月排行榜第二2015年7月 硬件/嵌入开发大版内专家分月排行榜第二2014年5月 VC/MFC大版内专家分月排行榜第二2014年3月 VC/MFC大版内专家分月排行榜第二2013年10月 VB大版内专家分月排行榜第二2013年7月 VB大版内专家分月排行榜第二2012年5月 VB大版内专家分月排行榜第二2012年4月 VB大版内专家分月排行榜第二2012年2月 VB大版内专家分月排行榜第二2011年11月 VB大版内专家分月排行榜第二
2015年11月 VC/MFC大版内专家分月排行榜第三2015年6月 VC/MFC大版内专家分月排行榜第三2015年2月 VC/MFC大版内专家分月排行榜第三2014年1月 VC/MFC大版内专家分月排行榜第三2012年3月 VB大版内专家分月排行榜第三2011年12月 VB大版内专家分月排行榜第三2011年10月 VB大版内专家分月排行榜第三
2018年5月 VC/MFC大版内专家分月排行榜第二2017年12月 VC/MFC大版内专家分月排行榜第二2017年6月 VC/MFC大版内专家分月排行榜第二2017年5月 VC/MFC大版内专家分月排行榜第二2017年1月 VC/MFC大版内专家分月排行榜第二2016年11月 VC/MFC大版内专家分月排行榜第二2016年4月 VC/MFC大版内专家分月排行榜第二2014年11月 VC/MFC大版内专家分月排行榜第二2014年1月 VC/MFC大版内专家分月排行榜第二2013年10月 VC/MFC大版内专家分月排行榜第二2013年9月 VC/MFC大版内专家分月排行榜第二2013年6月 VC/MFC大版内专家分月排行榜第二2013年4月 VC/MFC大版内专家分月排行榜第二2012年6月 VC/MFC大版内专家分月排行榜第二
2018年4月 VC/MFC大版内专家分月排行榜第三2018年3月 VC/MFC大版内专家分月排行榜第三2018年2月 VC/MFC大版内专家分月排行榜第三2018年1月 VC/MFC大版内专家分月排行榜第三2017年11月 VC/MFC大版内专家分月排行榜第三2017年9月 VC/MFC大版内专家分月排行榜第三2017年8月 VC/MFC大版内专家分月排行榜第三2017年4月 VC/MFC大版内专家分月排行榜第三2016年12月 VC/MFC大版内专家分月排行榜第三2016年10月 VC/MFC大版内专家分月排行榜第三2016年2月 VC/MFC大版内专家分月排行榜第三2015年10月 VC/MFC大版内专家分月排行榜第三2015年7月 VC/MFC大版内专家分月排行榜第三2012年10月 VC/MFC大版内专家分月排行榜第三
2014年11月 VC/MFC大版内专家分月排行榜第三
2018年5月 VC/MFC大版内专家分月排行榜第二2017年12月 VC/MFC大版内专家分月排行榜第二2017年6月 VC/MFC大版内专家分月排行榜第二2017年5月 VC/MFC大版内专家分月排行榜第二2017年1月 VC/MFC大版内专家分月排行榜第二2016年11月 VC/MFC大版内专家分月排行榜第二2016年4月 VC/MFC大版内专家分月排行榜第二2014年11月 VC/MFC大版内专家分月排行榜第二2014年1月 VC/MFC大版内专家分月排行榜第二2013年10月 VC/MFC大版内专家分月排行榜第二2013年9月 VC/MFC大版内专家分月排行榜第二2013年6月 VC/MFC大版内专家分月排行榜第二2013年4月 VC/MFC大版内专家分月排行榜第二2012年6月 VC/MFC大版内专家分月排行榜第二
2018年4月 VC/MFC大版内专家分月排行榜第三2018年3月 VC/MFC大版内专家分月排行榜第三2018年2月 VC/MFC大版内专家分月排行榜第三2018年1月 VC/MFC大版内专家分月排行榜第三2017年11月 VC/MFC大版内专家分月排行榜第三2017年9月 VC/MFC大版内专家分月排行榜第三2017年8月 VC/MFC大版内专家分月排行榜第三2017年4月 VC/MFC大版内专家分月排行榜第三2016年12月 VC/MFC大版内专家分月排行榜第三2016年10月 VC/MFC大版内专家分月排行榜第三2016年2月 VC/MFC大版内专家分月排行榜第三2015年10月 VC/MFC大版内专家分月排行榜第三2015年7月 VC/MFC大版内专家分月排行榜第三2012年10月 VC/MFC大版内专家分月排行榜第三
匿名用户不能发表回复！|vb求一个猜数字游戏的代码？_百度知道
vb求一个猜数字游戏的代码？
我有更好的答案
Dim&a&As&Integer&&&&&&&&a&=&Int(Rnd()&*&100)&&&&&&&&Dim&n&As&Integer&&&&&&&&n&=&0&&&&&&&&Dim&m&As&Integer&&&&&&&&m&=&1&&&&&&&&TextBox1.Text&=&a&&&&&&&&Do&&&&&&&&&&&&n&=&InputBox(&第&&&&m&&&&次了，请猜&)&&&&&&&&&&&&If&n&&&a&Then&&&&&&&&&&&&&&&&MsgBox(&太大了&)&&&&&&&&&&&&ElseIf&n&&&a&Then&&&&&&&&&&&&&&&&MsgBox(&太小了&)&&&&&&&&&&&&Else&&&&&&&&&&&&&&&&MsgBox(&猜对了&)&&&&&&&&&&&&End&If&&&&&&&&&&&&m&=&m&+&1&&&&&&&&&&&&If&m&&&10&Then&&&&&&&&&&&&&&&&MsgBox(&没猜对&)&&&&&&&&&&&&&&&&Exit&Do&&&&&&&&&&&&End&If&&&&&&&&Loop&Until&a&=&n
有可执行程序吗？
有的，留下联系方式 我发个给你
采纳率：80%
为您推荐：
其他类似问题
您可能关注的内容
猜数字游戏的相关知识
换一换
回答问题，赢新手礼包
个人、企业类
违法有害信息,请在下方选择后提交
色情、暴力
我们会通过消息、邮箱等方式尽快将举报结果通知您。用VB写一个猜数字游戏_百度知道
用VB写一个猜数字游戏
要求计算机产生随机数，猜中即胜，猜不中，提示是大了还是小了，继续猜，直到猜到，给出所用时间和评语，图形方式界面。最好简单点，有流程图最好
我有更好的答案
Private a As Long
'用于计时'timer的时间设为1000,事件写入 a = a + 1Private Sub Timer1_Timer()a = a + 1End SubPrivate Sub Form_Load()timer1.Enabled = 0End SubPrivate Sub CommandButton1_Click()a = Int(Rnd() * 100) '随机一个1~99的整数timer1.Enabled = 1Dob = Val(InputBox(&输入数字&))If a = b Thentimer1.Enabled = 0MsgBox &猜对了,你用了& & a & &秒&Exit DoElseIf a & b ThenMsgBox &太小了&ElseMsgBox &太大了&End IfLoopEnd Sub
采纳率：38%
Public tem As IntegerPublic counter As IntegerPublic num As IntegerPrivate Sub beg_Click() '为什么把Label3.Caption = counter & &S&放在这里边不起作用Timer1.Enabled = True
Randomizenum = int（Rnd * 100） + 1End SubPrivate Sub Form_Load()Timer1.Interval = 1000Timer1.Enabled = FalseEnd SubPrivate Sub ok_Click()tem = Val(Text1.Text)If tem = num ThenLabel4.Caption = &恭喜您，答对了&Timer1.Interval = 0ElseIf tem & num ThenLabel4.ForeColor = vbRedLabel4.Caption = &您的答案偏大,别灰心，再来一次&End IfIf tem & num ThenLabel4.ForeColor = vbRedLabel4.Caption = &您的答案偏小,别灰心，再来一次&End IfEnd IfEnd SubPrivate Sub Timer1_Timer()counter = counter + 1Label3.Caption = counter & &S&End Sub要工程文件的话发个邮箱
Dim Tie As String, Num As StringPrivate Sub Command1_Click()If Text1.Text & Num Then MsgBox &高了!&If Text1.Text & Num Then MsgBox &低了!&If Text1.Text = Num Then MsgBox &Yeah!答对了!用时:& & Tie: Text1.Text = &&: CRandomize: Tie = 0End SubPrivate Sub Form_Load()Tie = 0Num = 0Timer1.Interval = 1000End SubPrivate Sub Timer1_Timer()Tie = Tie + 1End SubPrivate Sub CRandomize()RandomizeNum = Int(Rnd * 10 + 0)End Sub
为您推荐：
其他类似问题
您可能关注的内容
猜数字游戏的相关知识
换一换
回答问题，赢新手礼包
个人、企业类
违法有害信息,请在下方选择后提交
色情、暴力
我们会通过消息、邮箱等方式尽快将举报结果通知您。VB数字猜猜猜的设计代码编写一个猜数游戏，要求如下： 1.要求有登陆界_百度知道
VB数字猜猜猜的设计代码编写一个猜数游戏，要求如下： 1.要求有登陆界
VB数字猜猜猜的设计代码编写一个猜数游戏，要求如下：
1.要求有登陆界面、猜数界面和退出界面。
2.随机产生一个数，玩家来猜猜看。游戏可以选择等级，不同等级对应不同的位数（1位数、2位数、3位数、4位数）。
3.猜错了要提示输入的数大了还是小了，以便提醒玩...
我有更好的答案
OK 我发给你
为您推荐：
其他类似问题
换一换
回答问题，赢新手礼包
个人、企业类
违法有害信息,请在下方选择后提交
色情、暴力
我们会通过消息、邮箱等方式尽快将举报结果通知您。}