VB 扫雷游戏程序

5.2.3 关于窗体设计.......................................................................................... 11 5.4 运行界面.......................................................................................................... 11 6 系统测试................................................................................................................... 13 结束语.......................................................................................................................... 14 参考文献...................................................................................................................... 16 附录.............................................................................................................................. 17
3
唐山学院课程设计 及右键，则 Button 值为 1+2=3. 在本游戏中，利用右键的 MouseDown 事件标示“已标示”方块，利用左键的 MouseDown 事件，标示使用者准备按下的方块，利用左键的 MouseUp 事件确定翻 开的方块。 4. ImageList 组件 利用 Imagelist 可以存储显示方块的图形[2]。将组件布置于窗体上后编辑组 件属性，通过【插入图片】按钮和【删除图片】按钮即可编辑组件内所存放的图 片。如图 1 所示。因为一个 Imagelist 组件内必须存储大小相同的图片，所在这 款游戏设计中，显示的图片共分为三个部分：游戏状态图形、数字计数图形和地 雷区标示图形。
详细说明如下： 1. For...Next 循环应用 在游戏设计上， 利用了两个二维数组分别记录地雷的分布状况及地雷区及表 面探测情形。利用数据循环的对比，不但速度快，而且在设计阶段，程序的架构 比较清楚。 2.Load 及 Unload 动态增加或删除组件 利用 Load 及 Unload 指令，可动态新增及删除组件。在游戏的雷区，依照使 用者自定义的地图类型，布置未探测的地雷方块。加载组件后，通过 Image 组件 的 Move 属性，将组件布置于预定的位置。Move 函数的原型如下： 组件. Move X 坐标，[Y 坐标],[组件宽度][组件高度] 再配合双循环的变量值，可以控制组件布置于窗体的方向及方式。 3.MouseDown 与 MouseUp 事件 在游戏过程中， 利用鼠标所发出的信息了解使用者的意图，进而做出相应的 动作。 在 MouseDown 与 MouseUp 事件中， 可以捕捉鼠标所按下或放开的按键为何、 鼠标光标在该组件上的坐标及是否同时按下辅助键等。用 Button 参数值表示鼠 标上的按钮数值。其意义如下： 1：左键 2：右键 4：中央键 若同时按下不止一个按键时，则传回数值为按键数相加。例如同时按下左键
2.2 本设计运用的技术
这个游戏里运用了 VB 里的组件及语法作为游戏运算和显示，其相关语法及 组件如下表 1 所示：
2
唐山学院课程设计
表 1 使用的语法及组件 组件及语法 For...Next 说明 利用循环布置地雷区、按下时检查非地雷方 块 Load(Unload) 动态加载或删除指令产生表示地雷方块图案 的 Image 组件 Mousedown 与 Mouseup 事件 Imagelist 组件 Image 组件 Timer 组件 PictureBox 组件 递归 判断按下或放开方块时的按键为左键或右键 存储游戏过程中所需的图案 利用此显示地雷方块 设定触发时间，来控制方块游戏时间 利用此组件作为地雷方块的布置区域 利用递归展开非地雷的方块
4
唐山学院课程设计 7. PictureBox 组件 PictureBox 为容器类型的组件，可以加入其它组件在内[3]。在游戏中利用了 PictureBox 的两个特性：容器特性和立体框架。分述如下： ●容器特性： 只要容器本身显示的行为改变， 在容器内的组件也会跟着改变。 当游戏初始时，地雷区的显示组件会循环执行，逐一布置在画面上，但由于执行 循环时多个 Image 组件要显示图形， 造成分时系统执行频率显示上会出现不流畅 的情形，若在循环之前，先将容器本身的 Visible 属性设为 False，在循环执行 完成后再将 Visible 属性设为 True，则显示就会变得流畅许多。 ●立体框架： 通过组件本身立体框线的属性设定，可以为游戏画面的显示上 营造出层次感。 8.递归 递归就是一个程序能被自己所定义的语句调用。在游戏过程中，当使用者按 下非地雷方块时， 方块会沿四周八个方向向外翻开非地雷的方块。程序执行时必 须判断：以按下方块为中心。检查周围八个方块是否为非地雷方块，若其中一个 方块是非地雷方块时， 则又以其为中心，向外检查周围八个方块是否为非地雷方 块，如此反复的行为即构成了递归的使用条件。当判断方块内容为数字时（即在 非地雷方块周围），即停止递归执行。
图 1 ImageList 组件属性
利用 ListImage 集合对象的 Picture 方法， 即可将 ListImage 组件内的图片 指定给图形显示组件，语法如下： Set 图形组件. Picture=Imagelist. ListImage(图片索引). Picture 5.Image 组件 利用 Image 组件作为游戏执行阶段所有图形的显示。在游戏画面中，计数数 字、游戏状态表情及地雷区方块图形等，都利用 Image 组件作为显示组件，再搭 配 ImageList 组件所存储的图形， 便可在执行阶段在同一个 Image 组件上变换不 同的图片。 6.Timer 组件 在游戏中， 地雷引爆的可能有 2 中， 第一种为使用者翻开 （踩到） 地雷方块， 第二种为设定时间内未探测完所有地雷而引爆。其中第二种的行为，可以通过 Timer 组件来加以控制。利用 Timer 组件在固定时间即会触发事件的特性，在事 件触发时便将计数值加 1，直到判断计数值超过限定值时，即引爆地雷。
目 录
1 引言............................................................................................................................. 1 2 Visual Basic 概况...................................................................................................2 2.1 VB 简介............................................................................................................... 2 2.2 本设计运用的技术............................................................................................ 2 3 可行性分析................................................................................................................. 6 4 总体设计..................................................................................................................... 7 4.1 设计构想............................................................................................................. 7 4.2 流程规划............................................................................................................. 7 5 详细设计..................................................................................................................... 9 5.1 画面规划............................................................................................................. 9 5.2 设计过程.......................................................................................................... 10 5.2.1 5.2.2 添加菜单................................................................................................. 10 自定义窗体设计..................................................................................... 10