Mover un picturebox con las teclas direccionales

El ejemplo que se muestra a continuación en muy útil, normalmente para hacer videojuegos donde se requiere mover un picturebox al presionar las teclas direccionales del teclado.



Dim Y As Integer = 188 ' posición inicial picturebox
Dim X As Integer = 10 ' posición inicial picturebox

    Private Sub Form1_KeyDown(sender As Object, e As KeyEventArgs) Handles Me.KeyDown

        '|------------------------------------------------------------------------------
        '| Detecta que tecla fue la que se presionó en base al Keycode 
        '|------------------------------------------------------------------------------
        Select Case e.KeyCode

            Case 37 ' Flecha Teclado Izquierda
                If (X >= 10) Then X = X - 10
                PictureBox1.Image = My.Resources.Link_Atras 'Cambia de imagen del picturebox

            Case 39 ' Flecha Teclado Derecha
                If (X <= 700) Then X = X + 10
                PictureBox1.Image = My.Resources.Link_Adelante 'Cambia de imagen del picturebox

        End Select

        PictureBox1.Location = New Point(X, Y) 'Posiciona la imagen en la nueva posición
        PictureBox1.Refresh() 'Redibuja la imagen
    End Sub

Para detectar arriba y abajo usa el keycode 38 y 40

Case 38 ' Flecha Teclado Arriba
Case 40   ' Flecha Teclado Abajo


Si necesitas conocer el Keycode de otras teclas, puedes descargar este programa KeycodeFinder

  Descargar Programa: 

• Recomendado, si lo que deseas es ver el proyecto final
• Descomprime el archivo .zip - Puedes usar 7Zip
• Ejecuta el archivo MoverPicturebox.exe

 Descargar Código: 

• Recomendado, si lo que deseas es ver el código del programa
• Carpeta con archivos editables en Microsoft Visual Studio 2012

Como amigo te recomiendo:  Primero descarga el Demo para tener una idea de lo que se puede hacer, luego intenta hacerlo a tu manera si tienes dudas pregunta en el blog, y por último en última instancia descarga el código, No te lo recomiendo pues de esta forma limito tu creatividad... No al Plagio!!!

--
Nota: La información contenida en esta publicación, así como el código fuente incluido en el mismo, se proporciona «COMO ESTÁ», sin garantías de ninguna clase, y no otorga derecho alguno. Usted asume cualquier riesgo al poner en práctica, utilizar o ejecutar lo recomendado o sugerido en la presente publicación.