vb.net使用GDI+实现简易贪吃蛇小游戏

代码建议给变量,函数,类命名的时候尽量规范一些

贪吃蛇用到的算法中两个关键的地方:

1:用数组或者其他数据结构保存蛇身体的位置,当蛇向前移动的时候,要注意迭代的关系。

2:当下达移动命令的时候,是改变了它下次移动的方向,而不是现在立刻就移动。

vb.net使用GDI+实现简易贪吃蛇小游戏_第1张图片

下面是代码 

Public Class 贪吃蛇
    Dim MySnake As Snake
    Private Sub Form1_KeyUp(sender As Object, e As KeyEventArgs) Handles Me.KeyUp
        If MySnake IsNot Nothing Then
            MySnake.ChangeDirection(e) '蛇改变方向
        End If
    End Sub
    Private WithEvents Mytimer As New Timer With {.Enabled = False, .Interval = 50} '设置一个timer控件变量并且用来接收事件
    Sub tick() Handles Mytimer.Tick '时间到了之后
        PictureBox1.Image = MySnake.MyBitmap '显示对象里面的图片
    End Sub
    Private Sub 开始ToolStripMenuItem_Click(sender As Object, e As EventArgs) Handles 开始ToolStripMenuItem.C

你可能感兴趣的:(小游戏代码)