百度 机构投资者都走了，剩下的就是散户在炒，游资在炒，挺要命的，孙宏斌乐视网现在已经就成一只典型的妖股，他以自己一个朋友也杀入买了乐视网股票为例称，机构投资者为什么跑掉？（乐视网）亏了100多亿嘛！（散户）听到消息就冲进去，风险太大了。
《VB实现的俄罗斯方块源代码解析》
在信息技术领域，编程是一项基本技能，而游戏开发则是许多初学者热衷的实践项目。本篇将详细探讨如何使用Visual Basic（VB）这种面向对象的编程语言来实现经典的俄罗斯方块游戏。通过分析提供的源代码，我们可以深入理解VB的基本语法、事件驱动编程以及游戏逻辑的构建。
VB是一种由微软公司开发的编程环境，它以直观的界面和简单的语法著称，非常适合初学者入门。在VB中创建俄罗斯方块，主要涉及到窗口应用程序的设计、图形绘制、键盘事件处理等核心内容。
1. **窗口应用程序设计**：
- VB中的Form是程序的主要界面，我们会在Form上创建一个画布（PictureBox）用于绘制游戏区域。
- 设置窗体大小、背景色，以及必要的控件如计分板、暂停/继续按钮等。
2. **图形绘制**：
- 俄罗斯方块的核心是各种形状的方块，这需要利用VB的绘图功能。在PictureBox上，我们可以用DrawRectangle方法画出不同颜色的矩形来表示不同的方块。
- 需要定义一个二维数组来存储当前游戏板的状态，每个元素代表一个格子，0表示空格，非0表示有方块。
3. **方块生成与移动**：
- 游戏开始时，随机生成一个新的方块并将其放在屏幕顶部。
- 方块下落的逻辑通过定时器（Timer）控制，每过一段时间，检查当前方块是否可以向下移动，如果可以，则向下移动一格。
- 方块旋转则涉及到了坐标变换，需要判断旋转后的新位置是否超出边界或与其他方块重叠。
4. **键盘事件处理**：
- 用户可以通过左右键控制方块水平移动，使用下键加速下落，上键尝试旋转方块。
- 这些功能的实现需要监听键盘事件，如KeyDown和KeyUp事件，并在事件处理函数中更新方块的位置。
5. **碰撞检测与消除行**：
- 当方块到达底部或与已有方块碰撞时，将其固定在当前位置，然后检查是否有完整的行可以消除。
- 消除行后，上方的方块会下落填补空白，同时分数增加。
6. **游戏结束条件**：
- 当新的方块无法在游戏板上放置时，游戏结束，显示游戏结束界面并提供重新开始选项。
通过这个项目，开发者不仅可以掌握VB的基础知识，还能了解游戏开发的基本流程和逻辑设计。更重要的是，通过实际操作，能够提高问题解决能力和逻辑思维能力。对于那些对编程有兴趣的人来说，这是一个很好的起点，同时也为更复杂的项目奠定了基础。
以上就是VB实现俄罗斯方块游戏的关键知识点，每一个环节都需要开发者具备一定的编程基础和逻辑思考能力。希望这份源代码能成为你学习VB和游戏开发的宝贵资源，同时也欢迎提出你的意见和建议，共同进步。
vb.rar （7个子文件） 
codefans.net 
Tetris.vbp 646B
