鉴于大家对VB十分关注,我们编辑小组在此为大家搜集整理了“ 用VB语言程序设计游戏探究 ”一文,供大家参考学习
编程前,首先,我们要掌握游戏的规则和功能。我们要编的是一个“找不同”的小游戏,在玩家进入游戏后,界面上出现两幅基本相同图片,在两幅图片中有几处细节不同的地方,找到后用鼠标单击。如果找对了,界面上就会出现红色的圈把不同的地方圈起来,如果点错了,则没有任何反应。游戏中两幅图片一共有四处不同,在30秒内,如果不同处全部找出来,则弹出“闯关成功”对话框;如果没有全部找出来,则弹出“时间到,闯关失败,是否重新再来?”对话框,单击“是”重新闯关,单击“否”则退出。其次,我们要清楚基本的制作思路:首先我们在网上下载两副基本上相同,上面有多处细节不同的图片。 在窗体里制作一个图片框,将下载好的图片插入到图片框中。③在图片的不同处上面加标签,并把标签的Backstyle 属性设置为“0-Transpare”,这样把标签隐藏在图片里。
然后再在标签的单击事件中制作出选中不同处画圆的程序。这样我们可以绕过复杂的程序,并能实现单击不同处画出红圈的效果。在窗体中我们用一个时钟控件,将时钟控件的Interval属性设置为“1000”,时钟控件 Interval属性中数值的单位是毫秒,设置为1000,就表示每隔1秒调用一次Timer事件中的程序。再在Timer事件中设置一个变量s,做一个变量减1,这样形成每1秒减1的倒计时的效果。制作一个文本框控件,将Timer事件中的变量 s的值随时显示在文本框中。在标签的单击事件和时钟的 Timer事件中分别编写弹出对话框语句,并用if语句控制对话框的返回值,如果返回“是”的值,那么重置游戏的初始值。如果返回“否”的值,则退出程序。下面我们就进入编程状态,各对象主要属性设置为: Form1的Caption为“找不同游戏”;Picture1的Picture属性为“插入图片的路径”;Label1—label8的Caption属性都为空,Backstyle属性为“0-Transpare”,label9、 label10的Caption属性分别为“两图中有四处不同找出来”和“抓紧啊!”;Text1的Text1属性为空;Timer1的 Interval属性为“1000”。