内容发布更新时间 : 2024/5/25 2:30:50星期一 下面是文章的全部内容请认真阅读。
课程设计报告
——俄罗斯方块☆☆☆☆
俄罗斯方块的程序共由三个窗体组成。主窗体由10×20的方格组成，程序启动时，主窗体为空白。
当发生了“开始”按键的click事件或者按“回车”键后，窗体加载方格，并且“暂停”按键的visible属性变成true，使“暂停”按键显示，使开始按键隐藏。并且从网格顶部自动的随机落下长条型、“T”字型、“7”字型、反“7”字型、“田字型5种形状之一。这五种形状都是由4个小方格组成。并且给下落的方格赋予随机的颜色。用户可以用规定的键盘键是形状左移、右移、加速下落
或者旋转（不能向上运动）。当落到网格底部或被已落下的形状挡住时，停止下落，堆积在一起，新的形状又自动从顶部落下。如果已堆积的方块中有占据一行的，则消去，并给予加分，如果一次消去多行，最多为四行，可以得到更多的分数。若方块达到网格顶部，则游戏结束。几分为本轮最终得分。
除主窗体外还有一个设置窗体及一个历史记录窗体。可以在主窗体中单击“选项”菜单，在下拉菜单中选择“设置”。调用form2，对于游戏进行基本设置，如：图形变换方向，按键方案，是否显示显示下一方块类型。
“历史记录”按键的click事件会调用form3，显示游戏得分的历史记录。
游戏过程中，可使用“暂停”键将游戏暂停，若要退出游戏，单击“结束”按钮，将会调用消息框函数，询问是否记录成绩。若选择否，则卸载form1；若选择否，则调用输入框按钮让用户输入姓名，并且判定是否输入的为空字符串。若是，则调用消息框函数，请输入正确的姓名；若不是，则将成绩记录至可执行文件所在文件夹中的“rank”文本文件中。
根据定时器的interval属性，将速度进行改变。得分每增加2000分，程序自动将方块下落速度提高一档。即分数越高，速度越快。根据判断blngrid数组中是否有一行全部为TRUE的情况，如果有，就加分。
该程序的考查点有：绘图、定时器控件的运用、键盘事件处理以及顺序访问文件的方法
绘图事件的主要代码：
1、若选择显示下一方块的类型，则在picnext图片框中进行绘图 For j = 1 To 4 For i = 1 To 4
picnext.Line (j - 1, i - 1)-(j - 0.2, i - 0.2), vbBlack, B