利用Visual Basic开发飞船着陆游戏

本文将带你进入一个探索之旅，一个艰难困苦的VB游戏编程之旅。由于VB没有快速的图形操作方法，所以它不是一个常用的游戏开发工具。不过这并没有阻碍那些勇于探索的人，只要巧妙地运用一些API知识，我们就可以做所有的事情。

　　设计步骤：

　　一、绘制图像

　　让太空飞船显示在屏幕上只要调用一个简单的API函数，实际上，我们使用API函数是考虑了速度因素，正常情况下PaintPicture方法就足够了。然而，由于太空船将到处做曲线运动，我们将调用BitBlt这一个API函数，它并没有特别的地方，只是将两个图象融合成一个图象。使用一些聪明的"技巧"，我们可以将太空飞船放入到一个充满星星的背景之中，并能让它到处移动。

　　二、获取随机数

　　微软提供的Rnd函数将返回一个在（0，1）之间的随机数，然而，在我们得到一个随机数之前，建议先发出一个"Randomize Timer"命令，timer函数返回午夜0点以来时间所经历过的秒数，Randomize命令设置了一个随机数产生器的种子，不要研究其背后的深邃的原理，只要明白这个命令可以使我们每一次都可以得到一个不同的随机数就可以了。

　　三、程序实现

　　现在我们已经拥有了着陆程序所有必需的元素，但是正象开药方一样，我们还需要小心的将它们组合在一起。首先生成一个新的工程，在FORM1上放置三个图片控件。

　　下面是我使用VB开发的一个太空飞船着陆游戏的界面效果图，有兴趣的朋友可以下载我的源代码