Подскажите с кодом на vb9

Формулировка задачи:

Подскажите пожалуйста если не сложно код Я пытаюсь сделать игру Арканоид. Я создал picturebox - мяч он передвигается от края к краю. Хотелось бы чтобы он двигался в том направлении в каком его запустили и чтобы он стукался об picturebox`ы (кирпичи) и разбивал их. Надеюсь на нас, хотелось бы сделать качественную игру

Решение задачи: «Подскажите с кодом на vb9»

textual
                            Листинг программы 
                        

                            Dim mox As Int32 = 7, moy As Int32 = 7
 
    Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick
        PictureBox1.Top += moy
        PictureBox1.Left += mox
        If PictureBox1.Top > (Me.Height - PictureBox1.Height) Then
            moy = -moy
        ElseIf PictureBox1.Top < 0 Then
            moy = -moy
        Else
            moy = moy
        End If
        If PictureBox1.Left > (Me.Width - PictureBox1.Width) Then
            mox = -mox
        ElseIf PictureBox1.Left < 0 Then
            mox = -mox
        Else
            mox = mox
        End If
    End Sub
                        