坦克编程素材-FC坦克大战 简单的金手指设置或者代码设置

1、首先铺设2排台阶素材,作为坦克履带的底部。

2、中间放置几块滚轮。

3、用台阶包围起来,这样就形成了坦克的履带。

4、用方形块在履带中间铺设,制作好坦克的身体。

5、用另外颜色的方块在顶部铺设舱门,左侧要凸起一块。

6、然后用台阶在舱门前面铺设一条细长的“炮管”,头部用2个台阶进行叠加,形成对比。

7、最后在顶部放置“生物模型方块”,这样就完成了。

实现基本要求代码: 100行 主要涉及: 基本控件及算法

一、设计题目:

坦克大战

二、目的与要求

1.目的

培养学生综合利用VB语言进行程序设计的能力,主要是培养学生的时钟控制和综合编程能力。

2.基本要求

n 要求使用面向对象和结构化程序设计的编程思路

n 能通过键盘W(上)、S(下)、A(左)、D(右)移动坦克。

n 可以通过上述按键随时改变坦克的方向。

n 炮身和炮筒分别为标签控件

u 当坦克移动到窗体边框时停止前进,但能改变方向。

u 按键J时可以按炮筒方向发射炮弹(炮弹为标签控件)。

3.创新要求

在基本要求达到后,进行创新设计,创新方向提示如下:

★ 增加固定障碍物。

★ 增加不固定障碍物。

★ 可发射连续炮弹。

★ 用户可自行设置按键。

★ 增加坦克移动速度等级。

★ 坦克使用其他控件

★ 其它创新(有一定难度,实现代码在30行以上)

三、设计方法和基本原理

1.问题描述

坦克由两个控件构成label1作为坦克的主体部分,label2作为炮管。在一个矩形区域内可以通过键盘控制坦克向上下左右移动,当移动到边界后就不再移动但可以变换方向继续移动。通过键盘控制可发炮。

2.问题的解决方案

①设计程序界面

因为用的全是基本控件,

界面设计

没有什么难度,照样子拼就可以了。

②编写代码

代码包括事件处理过程和功能函数,还有必要的声明。变量声明部分声明本程序所需要的变量和数组。

事件处理包括下面的主要事件:

Form_Load()

作一些初始化的工作。

Sub Form_KeyPress(KeyAscii As Integer)

坦克的移动通过窗体的keypress事件接受键盘按键,w键控制坦克向上,s键控制坦克向下,a键控制坦克向左,d键控制坦克向右。

炮弹的发射由键盘事件控制,单击j键发射炮弹。利用timer控件控制炮弹延直线移动(改变炮弹的top和left属性),当炮弹击中边缘后消失。

Sub Timer1_Timer()

炮弹的运动是由timer控件控制,发炮时启动timer事件。

四、主要技术问题的描述

本题中的难点并不在于界面设计,只需要放几个标签和一个时钟控件就可以了。

1. 坦克的移动

每当触发keypress事件后改变坦克的组成部分label1和label2的top和left属性,注意当坦克改变方向时,label1控件和label2控件的相对位置会改变。

2.炮弹的移动

每当利用keypress事件触发坦克的发炮,首先判断是否炮弹在运行当中,如果运行当中则不进行响应。炮弹的运动是由timer控件控制,发炮时启动timer事件。

五、参考资料

★

Visual Basic

程序设计教程 及 Visual Basic 实验教程

★ VB6.0程序员指南

★ VB6.0控件参考手册

★ 设计资料中的以及“计算器.ZIP”

★ MSDN中文版,

课程设计

网站上提供的其它资料。