Key Mapping a simple VB6 Program

This program is for key mapping purposes if you want to know the value of a certain key.

Load a form and please a text box

and type this code

Private Sub Text1_KeyDown(KeyCode As Integer, Shift As Integer)
msgbox(KeyCode)
End Sub

then run the program

Type any key to the textbox and press enter, a message box will appear with the Value of the key.

Thanks!!!
Yammy