[VB 2010] Snake: come non far sparire una label dai bordi

[campagnolo]

va bene grazie per i consigli, allora come linguaggio sto usando visual basic 2010 express
il codice che ho usato è così:

Private Sub btnSpostaSu_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnSpostaSu.Click
        Label1.Top = Label1.Top - 10
    End Sub

    Private Sub btnSpostaGiu_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnSpostaGiu.Click
        Label1.Top = Label1.Top + 10
    End Sub

    Private Sub btnSpostaSinistra_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnSpostaSinistra.Click
        Label1.Left = Label1.Left - 10
    End Sub

    Private Sub btnSpostaDestra_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnSpostaDestra.Click
        Label1.Left = Label1.Left + 10
    End Sub