三九宝宝网宝宝教育智力培养

用VB语言编写一个猜数字的游戏

02月10日 编辑 39baobao.com

[我想学易语言用来写个简单手游脚本该怎么入门]首先手游不是PC端游戏。这不属于易语言的范畴,易语言是电脑语言程序,建立在Win系统的 基础下运行的,而手机一般是安卓和ios苹果系统,易语言编写的程序无法在除win系统外的系统里...+阅读

首先说一说猜数字这个游戏的玩法,一开始计算机会随机产生一个不重复的四位数,你要输入四位不重复的数与计算机给出的数作对比,如果与计算机给出的数的位置相同数字相同,那么将会是1A,如果数字相同而位置相不同,将会显示1B。例如:计算机的随机数字为:1234 ,我猜的数字为:1356 ,那么这时计算机会给你提示为:1A1B,也就是32313133353236313431303231363533e59b9ee7ad9431333234323730说,你猜的数字中,有一位数字是猜对的,而且数字位置都对,所以显示为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 Sub Private Sub Command1_Click(Index As Integer) '用户输入时 '使得输入过的按钮无效 If Num

以下为关联文档:

怎么用C语言创建桌面快捷方式展开全部 C:\Documents and Settings\Default User\SendTo C:\Documents and Settings\你的用户名\SendTo 有没有“桌面快捷方式”这个desklink文件。 如果没有,在C:\Documen...

编写一个猜数字游戏#include #include #include #include #include void main() { int a,b,key; while(1) { srand(time(NULL)); a=rand()%100; printf("请输入您猜的数(0-99):"); scanf("%d",&b); wh...

编写一个猜数字游戏的程序/*利用随机函数生成0---9之间的一个整数,从键盘输入数字猜该数, 每次提示输入的数字与生成的数字之间的大小关系,并统计猜数的次数? 徊轮泻笙允靖檬?⒉率?拇问?暗燃?三次以内为优秀,...

编写一个猜数游戏程序static void Main(string[] args) { Random r = new Random(); int anwser = r.Next(0, 10); Console.WriteLine("1. Please input a number between 0 and 10."); Console.Wr...

统计决策与预测德尔菲法怎么用r语言编程static void(int[]group) { int temp; int pos=0; for(int i=0;i{ pos=i; for(intj=i+1;j{ if(group[j]{ pos=j; } }//第i个数与最小的数group[pos]交换 temp=group[i]; gro...

高一语文修改语言不得体之处不得体的地方可不止您说的四处的,请尊驾自己看一看吧 你修改确定了,不过既然为该人父亲,怎么后面出现了“你父亲的意愿亦是我”的表达?另外请您注意错别字 1、“欣闻您曾是我令...

用java编写一个图书馆图书借阅管理系统--------------------------------------------------- 给你修改了三个地方: 1.borrowBooks方法中,将System.out.println("你要借吗?"); 改为: System.out.println("你要借吗?输入1表示...

Java编写图书管理系统使用XML存储import java.io.File; import java.io.FileOutputStream; import java.util.ArrayList; import java.util.List; import java.util.Scanner; import org.dom4j.Document; im...

怎么编写关于建筑施工的安全月报的文章安全员的工作很枯燥,也不好做。因为施工方对安全这块大部分都是搪塞而过,敷衍了事,为啥?减少资金投入呗,像有的时候安全检查,好多安全设施都是从其他地方借来应付检查的。检查过后...

推荐阅读
图文推荐