内容索引:VB源码,游戏编程,VB游戏源码,侏罗纪公园
　　用VB创造一个侏罗纪公园，参加擂台赛的一个程序源码，要求纯VB代码，不能写外部文件、数据库，不能使用任何第三方控件，不能有任何API。
　　设计思路及流程如下，供参考：
　　1、创造三种动物，最大最凶狠的霸王龙，巨大但食草的剑龙，小巧而又跑的快的奔龙。
　　2、设计时一种动物对应一个窗体，运行时一个动物对应一个窗体。程序启动的时候默认创建1只霸王龙，1只剑龙，1只奔龙。
　　3、每种动物都随时能创建自己的同类，也就是说每个窗体上都要有一个创建同类的按钮，按一下就能创建一个自己的同类。
　　4、被吃掉的动物的窗体必须要Unload掉。
　　5、每一种动物都会发出叫声，所有动物都能听到叫声。每种叫声的有效时间为：霸王龙5分钟，剑龙3分钟，奔龙一分钟。
　　6、霸王龙的叫声能让所有动物四下奔逃。
　　7、奔龙在奔逃期间听到剑龙的叫声后可以选择躲藏到剑龙身后。
　　8、霸王龙在听到奔龙的声音之后能选择吃掉其中一只没有躲藏到剑龙身后的奔龙。5分钟之内不能吃第二只。
　　9、每一只奔龙在被吃掉的时候都会发出惨叫，同类听到惨叫之后会感到悲伤，霸王龙听到之后可以选择跑去分一杯羹。
　　其它说明：
　　其中1、2、3、4点为强制要求，后面几点为建议要求。可以根据题目要求来做，也可以根据自己想象力自由发挥。
　　由于只是模拟的世界，所以不必设计图形和动作。像奔逃、躲藏、悲伤等可以用文字回显加以说明。（有兴趣的也可以做窗口移动等效果）
　　本程序实现了前面几点强制要求，后面几点建议要求弱弱地做了一下。
　　双击霸王龙窗体强行关闭程序，吃完奔龙后一段时间自行关闭。

进入下载地址页面

　1. 如果某源代码或其它资源侵犯了您的利益，请立即告之我们，以便尽快得到处理。
　2. 我们提供的源代码意在用于学习和研究，未经作者或本站许可请勿用于商业用途，由此造成的不良后果本站不承担任何法律责任。