How do I get visual basic 6 to respond to key press events at run time?

[Jsh]

Specifically the up, down, left and right keys. Thanks.
Agh! This isn't working:

Private Sub Form_KeyDown(KeyCode As Integer, Shift As Integer)
If KeyCode = vbKeyLeft Then
label1.Caption = "LEFT"
End If
End Sub

[cld]

'Use this code to figure out the key codes
Private Sub Form_KeyDown(KeyCode As Integer, Shift As Integer)
Print KeyCode
End If
End Sub

From there, you can see the numerical equivalents to the keys. From there, you can just plug in the numbers replacing the brackets.

Private Sub Form_KeyDown(KeyCode As Integer, Shift As Integer)
Select Case KeyCode
Case Is=[left]
label1.Caption = "LEFT"
Case Is=[right]
label1.Caption = "RIGHT"
Case Is=[down]
label1.Caption = "DOWN"
Case Is=[up]
label1.Caption = "UP"
End Select
End Sub