摘要：这一款趣味撞球游戏能使玩家在玩游戏时既可以享受游戏的乐趣，又可以锻炼大脑的反应能力和手指的灵活度。该趣味撞球游戏使用Microsoft公司的Visual Basic 6.0开发工具，集各种控件于一体。该游戏有简单、较难、很难等几个级别，玩家可以根据自己的情况，能进行选择。
关键词：控件；Visual Basic 6.0；窗体
中图分类号：TP311 文献标识码：A文章编号：1009-3044(2010)20-5493-02
The Design of Fun Pool Game Used VB
WEI Qing
(Computer Science and Electronic Information Engineering Department, Heze University, Heze 274015, China)
Abstract: The interesting knocking ball game can make player may enjoy game already while playing games, can temper reaction ability and flexibility degree of finger of brain, interesting knocking ball game this use Microsoft Visual Basic6.0derveloping instrument of Company, incorporate various controlling parts into an organic whole. Add various controlling parts step by step, make up an intact game interface.Have simple, more difficult, very more difficult several ranks to it's time to play for you to choose, the player can operate simply, more difficult, very more difficult on the basis of the difficulty.
Key words: body of controlling part; Visual Basic 6.0; Window
游戏对于每个人来说，都不陌生，可以说它是生活中的一个小插曲，可以调节人的神经，特别是在用脑疲劳时，玩一玩游戏，既可以快速摆脱疲劳，同时有效的提高手指灵活度。这个趣味撞球游戏的特点是：简单易学，占用空间少，不需要高深的知识而且很灵活。游戏运用Visual Basic为开发工具，其设计主要包括：用Shape控件来描述小球这个对象、用键盘上的方位键进行移动这两个方面。对于前者要求各控件使用准备、完整性和一致性，而对于后者要求移动迅速，具有易使用等特点。
1 游戏规则
打开游戏窗体之后，界面如图1所示，可以看到本游戏有简单、较难、很难3个按钮，单击其中的一个按钮选择游戏的难度，再按开始按钮，就可以进行游戏了。
趣味撞球这个游戏的规则：例如：游戏开始时，玩家先单击一下“简单”选项按钮，再按开始按钮，就可以看到一只红色的小球在箱子中不停的弹跳，玩家要用键盘上的“”键和“”键移动下面的木板进行阻挡，别让它停下来，每接下小球就可以看到上面的得分多一分，接小球的次数越多，得分就越多，如果小球落在木板以外的地方，那么你就会看到这样的提示“你输了！下次努力！”那么，这一局就输了，若想重新开始游戏，先选定要玩的选项，再按开始键就可以重新进行游戏了。
2 制作步骤及实现
本案例首先要创建vCollide.vbp工程
2.1 新建窗体
要创建这个游戏，必须要先新建一个工程1，下面的控件都要在这个新工程1中添加。
在工程1中新建一个Form，其属性值如下：名称=frmCollide；Caption=趣味撞球，其界面如图2。
3.2 添加箱子
要给红色的小球添加一个运动的空间，也就是小球的运动过程是在一只箱子里进行的，因为它有顶、有底、有壁。可以使小球弹跳自如。
在窗体上添加一个Picturebox控件，命名为“Picture1”.如图3所示。
2.3 创建小球及木板
箱子已经有了，现在要做的是，在箱子里面添加一只红色的小球，让它可以在箱子里跳来跳去。在Picture 1控件上添加一个Shape控件，其属性值如下：名称=Shape1；Shape=”3-Cirde”；Fillstyle=0；Fillcolor=”&H000000FF&”。
在游戏中，红色的小球是不能落到箱子底部的，所以，必须要创建一块木板来接住红色的小球，不能让它落下来，否则，就输了！红色的小球落在木板上，可以借住木板的力度，让小球反弹上去。接住的次数越多，得分就越多。
在Picture控件上添加一个Line控件，其属性值如下：名称=Line1；Borderwidth=5
其界面如图4。
2.5 添加时钟控件
为了使本游戏有时间间隔，所以这里必须加上一个时钟控件。在窗体上添加一个Timer控件，其属性值如下：名称=Timer1；Interval=200；Enabled=False。其界面如图5。
2.6 得分界面
在玩游戏时，要清楚地知道自己目前的得分情况，也可以清楚地知道其它玩家的情况，这样可以知道自己的实力有多少，这也是与其它玩家比赛定胜负的唯一的手段。
在窗体上添加两个Label控件，分别命名为“Label1”和“Label2”其Caption属性值
分别为“得分”和“0”。其界面如图6。
2.7 添加框架控件及单选钮控件
玩游戏的时候，不能总是玩一个级别的，这样过于乏味，可以创建多个难度级别，供玩家们参考。为了让玩家很容易地选择级别，要添加一个框架控件，把难度级别规范起来。在窗体上添加一个Frame控件，命名为“Frame1”，其Caption属性值为“难度级别”。
在本游戏中，创建了三个级别：简单、较难、很难。要把这三个单选钮控件添加在框架控件上面。在Framel控件上添加三个Option控件，分别命名为“Option1” “Option2” 和“Option3”。其中Caption属性值分别为“容易”、“较难”、“很难”。其界面如图7。
2.9 添加命令按钮控件
一切准备就绪之后，就可以开始玩了，但是怎么开始？怎么退出呢？在这里必须添加“开始”和“退出”这两个命令按钮。玩家在玩时可以单击开始就可以玩了。
在窗体上添加两个控件，分别命名为“cmdbegin”和“cmdexit”，其属性分别为“开始”和“退出”。其界面如图8。
3 总结
趣味撞球游戏已成功通过测试。
参考文献：
[1] 王彬华.中文Visual Basic 6.0实例教程[M].成都:电子科技大学出版社,2003.
[2] 刘冰.中文Visual Basic 6.0程序设计基础[M].成都:四川大学出版社,2004.
[3] 王彬华,李建华.Visual Basic精彩编程五十例[M].成都:电子科技大学出版社,2004.
[4] 罗耀军,李湘林,苏德永.中文Visual Basic 6.0操作教程[M].西安:西北工业大学出版社,2002.
[5] 武马群.Visual Basic 6.0程序设计[M].北京:北京工业大学出版社,2001.
[6] 段兴.Visual Basic6.0控件实用程序设计100例[M].北京:人民邮电出版社,2002.
[7] 佟伟光.Visual Basic 程序设计教程[M].北京:电子工业出版社,2001.
[8] 潭浩强,恭淑斌,袁玫. Visual Basic程序设计[M].北京:清华大学出版社,2000.
