我按下上下左右这几个控制键的时候，发生相应的事件，怎么做？
我按下上下左右这几个控制键的时候，发生相应的事件，怎么做？帮帮忙，知道的说一下啊
Private Sub Form_KeyDown(KeyCode As Integer, Shift As Integer)
If KeyCode = 37 Then
MsgBox ("左")
End If
If KeyCode = 38 Then
MsgBox ("上")
End If
If KeyCode = 39 Then
MsgBox ("右")
End If
If KeyCode = 40 Then
MsgBox ("下")
End If
End Sub
