Bueno aca les voy a dejar un programa que hice yo
el programa en si es muy simple, lo unico que hace es
devolverles en un recuadro el valor Ascii de la tecla pulsada.
lo hice ver mas facilmente el varor de una tecla

aca les dejo el link de descarga

http://www.megaupload.com/?d=SYBPJPV5

Espero que les sirva

tambien les dejo el codigo fuente x si a alguien le interesa
Codigo fuente del programa:

Form1:

Private Sub Command1_Click()

Form2.Visible = True

End Sub

Private Sub Form_Load()

Me.Caption = "Valor KeyAscii"
Form2.Visible = False
Label1.Caption = "KeyAscii"
Label2.Caption = ""
Label3.Caption = "Tecla"
Text1.Text = ""
Label1.AutoSize = True
Label1.BackStyle = 0
Label2.AutoSize = True
Label2.BackStyle = 0
Label3.AutoSize = True
Label3.BackStyle = 0
Label2.FontSize = 20
Label2.FontBold = True
Label2.Font = Arial
Text1.MaxLength = 1
Command1.Caption = "Ayuda"

End Sub

Private Sub Text1_KeyPress(KeyAscii As Integer)

Text1.Text = ""
Label2.Caption = KeyAscii

End Sub

el segundo formulario no lo pongo ya que es la parte de ayuda. no tiene demasiada utilidad.