VB编写的格斗勇士游戏源代码免费放出.rar

作者：星光 　　编程原理详解： 　　Image1是背景，Image2是人物(玩家)，image3是子弹，image4是敌人，image5是敌人子弹， 　　Label1有来显示“START”和“GAMEOVER”的,Label2和Label3用来显示任务状态， 　　Label4和Label5显示生命值，label6显示关数，Label7显示是否发大招， 　　Label8和Label9是用来直观显示生命值的，算法为：Label8.Width = Label4 * 10，这几个Label控件在代码中起到间接判断的作用 　　Timer1控制人上升，Timer2控制人下降, Timer3和Timer4控制让玩家子弹移动，Timer5控制第一关敌人车和子弹移动 　　Timer6判断子弹与人是否相碰，并减小生命值，Timer7控制第二关大怪上下移动，Timer8控制第三关子弹机车的移动 　　所有Picture控件中的图片，都是用于人物发生动作时(有的图片没用上)，进行与Image图片切换，图片切换时，让人感觉image内的图片真动了! 　　键盘控制说明一下，空格键负责“跳”动作，Shift键和回车键控制发大招，W、S、A、D与方向键命令一样 　　下面这段代码是延时代码，出现过很多次，作用是：让两张图片切换时能让我们看见，VB执行速度很快，不加入这个就会看不出来图片切换 　　Dim Savetime As Single 　　Savetime = Timer ‘记下开始的时间 　　While Timer < Savetime 2 ‘循环等待 　　DoEvents ‘控制权，以便让操作系统处理其它的事件。 　　Wend 　　好了说到这里，这是我做的第二个，还不是很完善，希望大家下载鼓励一下!里有操作说明：空格键负责“跳”动作，回车键发招，Shift键和回车键组合发大招。W、S、A、D和方向键命令一样(会玩的用前者，会玩卡丁车的用后者)