Mine

Public Class Form1
    Private Sub Form1_KeyDown(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyEventArgs) Handles Me.KeyDown
        If e.KeyCode = Keys.A Then
            imgship.Image = System.Drawing.Image.FromFile("C:\Users\Snake\Desktop\left.jpg")
        End If
    End Sub

    Private Sub Form1_KeyUp(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyEventArgs) Handles Me.KeyUp
        If e.KeyCode = Keys.A Then
            imgship.Image = System.Drawing.Image.FromFile("C:\Users\Snake\Desktop\standard.jpg")
        End If
        If e.KeyCode = Keys.S Then
        End If
    End Sub

    Private Sub Form1_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
    End Sub
End Class