- 1、本文档共11页,可阅读全部内容。
- 2、原创力文档(book118)网站文档一经付费(服务费),不意味着购买了该文档的版权,仅供个人/单位学习、研究之用,不得用于商业用途,未经授权,严禁复制、发行、汇编、翻译或者网络传播等,侵权必究。
- 3、本站所有内容均由合作方或网友上传,本站不对文档的完整性、权威性及其观点立场正确性做任何保证或承诺!文档内容仅供研究参考,付费前请自行鉴别。如您付费,意味着您自己接受本站规则且自行承担风险,本站不退款、不进行额外附加服务;查看《如何避免下载的几个坑》。如果您已付费下载过本站文档,您可以点击 这里二次下载。
- 4、如文档侵犯商业秘密、侵犯著作权、侵犯人身权等,请点击“版权申诉”(推荐),也可以打举报电话:400-050-0827(电话支持时间:9:00-18:30)。
- 5、该文档为VIP文档,如果想要下载,成为VIP会员后,下载免费。
- 6、成为VIP后,下载本文档将扣除1次下载权益。下载后,不支持退款、换文档。如有疑问请联系我们。
- 7、成为VIP后,您将拥有八大权益,权益包括:VIP文档下载权益、阅读免打扰、文档格式转换、高级专利检索、专属身份标志、高级客服、多端互通、版权登记。
- 8、VIP文档为合作方或网友上传,每下载1次, 网站将根据用户上传文档的质量评分、类型等,对文档贡献者给予高额补贴、流量扶持。如果你也想贡献VIP文档。上传文档
查看更多
用ExcelVBA编写俄罗斯方块游戏3
游戏编程
GAME PROGRAM
用Excel VBA 编写俄罗斯方块游戏
许 晴
摘 要: “俄罗斯方块” 作为一款经典的休闲游戏在新鲜出炉时就显得非常直观, 虽然经过
了大量的变形和更改, 但游戏核心依然保持不变。 文中以Excel 2007 为游戏平台, 利用
VBA 及Excel 的功能和属性, 详细地介绍了俄罗斯方块程序游戏编写过程。
关键词: Excel ; VBA ; 俄罗斯方块
俄罗斯方块这款经典游戏可以说是家喻户晓。 游戏的概念
1 设置人机界面
十分简单, 游戏区域顶部随机落下各种形状各异的方块, 玩家
要试图用它们拼成没有空隙的行并赢得分数。 俄罗斯方块验证 1.1 定义游戏区域
了 “简单的往往是最好的” 这样一个道理, 方块之中似乎蕴藏 操作步骤:
( ) 选中单元格区域 : , 共 行 列, 此区域即
着无穷的魔力, 至今仍经久不衰, 相信现在还有不少人在闲暇 1 E2 R25 24 14
之余会玩上几把消遣一下。 为方块的活动范围, 当方块向上累计触及到 “TETRIS ” 工作
很多编程爱好者都曾经编写过自己的俄罗斯方块游戏, 现 表的第二行同时也是游戏区域的顶部时游戏结束。
在将带领大家一步步实现一个Excel 版本的俄罗斯方块。 (2 ) 在编辑栏左端的 “名称” 框中键入名称 “GameArea”
图 是实现的游戏界面。 并按下 “Enter ” 键。
1
(3 ) 对区域 “GameArea” 左右两边的列以及区域底部下
一行单元格进行修饰美化, 采用适当的颜色进行填充, 这些区
域将用作方块的 “ 围墙”, 注意一定要使用某种颜色进行填充,
因为这将是判断方块是否能够移动的重要依据, 具体判断方法
将会在下面详细介绍。 修饰结果如图 所示。
2
图1 Excel 俄罗斯方块
首先打开 Excel 2007 , 新建一个工作簿并将其保存为
Excel 启用宏的工作簿, 文件名为 Excel 俄罗斯方块.xlsm , 并
将工作表 “Sheet1” 重命名为 “TETRIS ”, 作为游戏界面并调
整此工作表中的列宽和行宽至合适大小并使其大小一致, 因为
在游戏中单元格将被用来组成方块, 如果大小不合适或不一致
对游戏的效果影响很大。 本例中游戏区域的行宽和列宽都为
16 像素大小。
图 游戏区域修饰结果
2
2009
文档评论(0)