vb制作飞机大战

vb制作飞机大战(1)

(本文适合vb初学者)
vb实现飞机大战的几个功能
1：我方飞机的移动
2：我方子弹的发射
3：子弹的飞行
4：判断是否命中
5：一些技能
6：敌方飞机的飞行及攻击
笔者能想到的也只有这些了

---

流程图如下↓

判断按键

飞机移动并判断是否超出窗体

发射子弹及子弹飞行

判断技能蓄力及释放技能

子弹命中，得分+1并显示出来

敌方初始化及子弹发射

玩家命中，游戏结束

首先，创建一个标准exe工程
点击 工程- 工程1 属性-工程名称改为 飞机大战
设置窗体名称为MF

接着，添加一个picturebox，用来表示玩家的飞机，修改名称为wjfj，设置其picture属性为事先设置好的图片

下一步，添加十个image控件，修改名称为img- zd，设置其picture属性，用来显示自己的子弹

添加2个timer控件，用来飞行子弹及控制敌方飞机，名称无所谓

添加一个image控件数组，名称为dfpl(创建一个，设置好属性，直接复制粘贴)，用来表示敌方飞机

布局自己控制

由于子弹是一个控件数组，所以要设置好其索引
在通用过程中写入：<