| 网站首页 | 业界新闻 | 小组 | 威客 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛
欢迎加入我们,一同切磋技术
用户名:   
 
密 码:  
共有 1325 人关注过本帖
标题:做贪吃蛇游戏的想法和过程??
只看楼主 加入收藏
liuyazi79
Rank: 1
等 级:新手上路
帖 子:34
专家分:0
注 册:2004-5-25
收藏
 问题点数:0 回复次数:6 
做贪吃蛇游戏的想法和过程??

我用键盘来控制一个图片的移动.但如何做个边界限制呢?就是碰到边限时提示?

Private Sub Form_KeyDown(KeyCode As Integer, Shift As Integer) Select Case KeyCode Case vbKeyLeft Picture1.Left = Picture1.Left - 100 Case vbKeyUp Picture1.Top = Picture1.Top - 100 Case vbKeyDown Picture1.Top = Picture1.Top + 100 Case vbKeyRight Picture1.Left = Picture1.Left + 100 End Select End Sub

Private Sub Form_Load() Me.KeyPreview = True End Sub

[此贴子已经被作者于2004-06-22 22:40:03编辑过]

搜索更多相关主题的帖子: 贪吃 游戏 
2004-06-22 10:01
griefforyou
Rank: 6Rank: 6
等 级:贵宾
威 望:27
帖 子:3336
专家分:0
注 册:2004-4-15
收藏
得分:0 

Private Sub Form_KeyDown(KeyCode As Integer, Shift As Integer)

Select Case KeyCode Case vbKeyLeft Picture1.Left = Picture1.Left - 100 Case vbKeyUp Picture1.Top = Picture1.Top - 100 Case vbKeyDown Picture1.Top = Picture1.Top + 100 Case vbKeyRight Picture1.Left = Picture1.Left + 100 End Select If Picture1.Left < 0 Then Picture1.Left = 0 If Picture1.Top < 0 Then Picture1.Top = 0 If Picture1.Left > Me.ScaleWidth - Picture1.Width Then Picture1.Left = Me.ScaleWidth - Picture1.Width If Picture1.Top > Me.ScaleHeight - Picture1.Height Then Picture1.Top = Me.ScaleHeight - Picture1.Height End Sub

Private Sub Form_Load() Me.KeyPreview = True End Sub


天津网站建设 http://www./
2004-06-22 17:03
liuyazi79
Rank: 1
等 级:新手上路
帖 子:34
专家分:0
注 册:2004-5-25
收藏
得分:0 

老大,最后两句的意思不是很明白,但作用我知道,

If Picture1.Left > Me.ScaleWidth - Picture1.Width Then Picture1.Left = Me.ScaleWidth - Picture1.Width If Picture1.Top > Me.ScaleHeight - Picture1.Height Then Picture1.Top = Me.ScaleHeight - Picture1.Height

你能不能用中文说明一下.......,"Me.ScaleWidth" " me "就更明白??

2004-06-22 20:00
griefforyou
Rank: 6Rank: 6
等 级:贵宾
威 望:27
帖 子:3336
专家分:0
注 册:2004-4-15
收藏
得分:0 
Me在VB中代表窗体对象,如果窗体名称是Form1,这里的Me.ScaleWidth就等于Form1.ScaleWidth

天津网站建设 http://www./
2004-06-22 21:52
liuyazi79
Rank: 1
等 级:新手上路
帖 子:34
专家分:0
注 册:2004-5-25
收藏
得分:0 

非常感谢grief兄,这是我做贪吃蛇的第一步,下一步呢,是就怎样使一个图片出现在不同的位置,就是让蛇身一节一节的加长.

2004-06-22 22:38
griefforyou
Rank: 6Rank: 6
等 级:贵宾
威 望:27
帖 子:3336
专家分:0
注 册:2004-4-15
收藏
得分:0 

晕,你的想法和我不同,我是用二维数组,控制每一个元素的值来实现。

比如下面这个地图 0000000000000 0010000000000 0010000000000 0011110000000 0000000000000 0000000000000 数组元素的值为1代表为蛇的身体,为0则是空白的地方


天津网站建设 http://www./
2004-06-23 09:24
liuyazi79
Rank: 1
等 级:新手上路
帖 子:34
专家分:0
注 册:2004-5-25
收藏
得分:0 
我对二维数组还不会.你能不能用二维数组教我做呢.
2004-06-23 09:47
快速回复:做贪吃蛇游戏的想法和过程??
数据加载中...
 
   



关于我们 | 广告合作 | 编程中国 | 清除Cookies | TOP | 手机版

编程中国 版权所有,并保留所有权利。
Powered by Discuz, Processed in 0.051281 second(s), 7 queries.
Copyright©2004-2024, BCCN.NET, All Rights Reserved