社区
下载资源悬赏专区
帖子详情
vb.net编写的俄罗斯方块下载
weixin_39820535
2019-07-09 01:30:14
本程序是用visual studio 2005 加以完成的。完成目标是做俄罗斯方块小程序。控制键是4个方向键。
相关下载链接:
//download.csdn.net/download/cnqmnh/2947326?utm_source=bbsseo
...全文
10
回复
打赏
收藏
vb.net编写的俄罗斯方块下载
本程序是用visual studio 2005 加以完成的。完成目标是做俄罗斯方块小程序。控制键是4个方向键。 相关下载链接://download.csdn.net/download/cnqmnh/2947326?utm_source=bbsseo
复制链接
扫一扫
分享
转发到动态
举报
写回复
配置赞助广告
用AI写文章
回复
切换为时间正序
请发表友善的回复…
发表回复
打赏红包
vb.net
编写
的
俄罗斯方块
本程序是用visual studio 2005 加以完成的。完成目标是做
俄罗斯方块
小程序。控制键是4个方向键。
VB.NET
编写
的
俄罗斯方块
游戏程序
一个游戏引擎的入门教程,介绍如何定制和
编写
游戏。这个
俄罗斯方块
游戏,支持你直接修改颜色外观难度,而不需要修改代码。
用
VB.NET
开发交互式CAD系统
用
VB.NET
开发交互式CAD系统,包括结合GDI+和OPENGL两种方案。 联系平台客服可开发票。
vb.net
做的
俄罗斯方块
Vb写的
俄罗斯方块
基本功能全'声明一个整数常量Width,表示游戏界面横向的小正方形数目,初始化为16 Public Const Width As Integer = 16 '声明一个整数常量Height,表示游戏界面横向的小正方形数目,初始化为30 Public Const Height As Integer = 30 '游戏界面的背景色 Public Shared BackColor As Color '小正方形的大小 Public Shared SquareSize As Size = New Size(10, 10) Public Shared g As Graphics '声明一个Graphics变量,用于绘制下一个方块 Public Shared gNext As Graphics '声明一个数组,用于表示游戏界面上的所有小正方形 Private Shared ArrGameField(Width - 1, Height - 1) As CSquare '函数功能:判断ArrGameField(x, y)是否有正方形,有则返回False,无则返回True Public Shared Function IsEmpty(ByVal x As Integer, ByVal y As Integer) As Boolean If x >= 0 And x = 0 And y =0 '在循环体中,先判断第y行是否是满的,是的话result增1,并把第y行上的所有小正方形下降一行.最后y递减1 '如果实现把第y行的所有小正方形下降一行:从第y行扫描至第0行,每扫描一行,把上一行的每个小正方形赋值给该行,并修改每一个小正方形的Location属性的值 While Y >= 0 If IsLineFull(Y) Then result += 1 For i As Integer = Y To 0 Step -1 If i > 0 Then For x As Integer = 0 To Width - 1 ArrGameField(x, i) = ArrGameField(x, i - 1) If Not ArrGameField(x, i) Is Nothing Then ArrGameField(x, i).Location = New Point(ArrGameField(x, i).Location.X, ArrGameField(x, i).Location.Y + SquareSize.Height) End If Next Else For x As Integer = 0 To Width - 1 ArrGameField(x, i) = Nothing Next End If Next Else
俄罗斯方块
vb.net
俄罗斯方块
用
vb.net
编写
的,是源程序。很简陋
下载资源悬赏专区
12,777
社区成员
12,304,529
社区内容
发帖
与我相关
我的任务
下载资源悬赏专区
CSDN 下载资源悬赏专区
复制链接
扫一扫
分享
社区描述
CSDN 下载资源悬赏专区
其他
技术论坛(原bbs)
社区管理员
加入社区
获取链接或二维码
近7日
近30日
至今
加载中
查看更多榜单
社区公告
暂无公告
试试用AI创作助手写篇文章吧
+ 用AI写文章