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