Wyo VB Lecture Notes

Objective #1: Be able to use the KeyDown & KeyPress methods.

• Some interesting methods can be used with a form including MouseDown, MouseUp, MouseMove, KeyPress, and KeyPress.
  
• A form's KeyDown method allows your program to respond to presses of the arrow keys on the keyboard.
  
  Private Sub Form1_KeyDown(...)

     If (e.KeyCode = Keys.Right Or e.KeyCode = Keys.D or e.KeyCode = Keys.NumPad6) Then
        picPlayer.Left = picPlayer.Left + 5
     ElseIf (e.KeyCode = Keys.Left Or e.KeyCode = Keys.A or e.KeyCode = Keys.NumPad4) Then
        picPlayer.Left = picPlayer.Left - 5
     ElseIf (e.KeyCode = Keys.Up Or e.KeyCode = Keys.W or e.KeyCode = Keys.NumPad8) Then
        picPlayer.Top = picPlayer.Top - 5
     ElseIf (e.KeyCode = Keys.Down Or e.KeyCode = Keys.S or e.KeyCode = Keys.NumPad2) Then
        picPlayer.Top = picPlayer.Top + 5
     End If

  End Sub

• A form's KeyPress method also allows your program to respond to presses of various letter keys on the keyboard.
  
  Private Sub Form1_KeyPress(...)

     If (e.KeyChar = "d") Then
        picPlayer.Left = picPlayer.Left + 1
     ElseIf (e.KeyChar = "a") Then
        picPlayer.Left = picPlayer.Left - 1
     ElseIf (e.KeyChar = "w") Then
        picPlayer.Top = picPlayer.Top - 1
     ElseIf (e.KeyChar = "s") Then
        picPlayer.Top = picPlayer.Top + 1
     End If

  End Sub
  
  If you have placed one or more buttons on your form, you may need to set the form's KeyPreview property to True in order for the KeyPress method to work correctly.