Chr() - Very weird [Resolved]

[UTGrim]

I'm making a calculator that receives input through the form's KeyUp event. I created a Select Case to know what characters were input like this:

Private Sub Form_KeyUp(KeyCode As Integer, Shift As Integer)
Select Case Chr(KeyCode)
    Case "0"

This works fine when I type with the numbers on top of the letter keys, but when I use the numbers to the right of the keyboard, Chr() returns some weird characters, like 96 (`).

How can I know what characters were typed down for real?

Thank you.

[RobDog888]

You will have to select case on all possible key codes and since the number above the letter keys are different
keys from the number pad. You might try the KeyPres event since its parameter is KeyAscii and not the actual
key but its equilivalent ascii character code.

[RobCrombie]

This comes from a working pgm.
It is in the Form's Keydown event.
It will detect the normal digit keys, and the numeric keypad keys.

Select Case KeyCode
    Case Asc("0"), 96
      lblQuickLeadAccess.Caption = lblQuickLeadAccess.Caption & 0
    Case Asc("1"), 97
      lblQuickLeadAccess.Caption = lblQuickLeadAccess.Caption & 1
    Case Asc("2"), 98
      lblQuickLeadAccess.Caption = lblQuickLeadAccess.Caption & 2
    Case Asc("3"), 99
      lblQuickLeadAccess.Caption = lblQuickLeadAccess.Caption & 3
    Case Asc("4"), 100
      lblQuickLeadAccess.Caption = lblQuickLeadAccess.Caption & 4
    Case Asc("5"), 101
      lblQuickLeadAccess.Caption = lblQuickLeadAccess.Caption & 5
    Case Asc("6"), 102
      lblQuickLeadAccess.Caption = lblQuickLeadAccess.Caption & 6
    Case Asc("7"), 103
      lblQuickLeadAccess.Caption = lblQuickLeadAccess.Caption & 7
    Case Asc("8"), 104
      lblQuickLeadAccess.Caption = lblQuickLeadAccess.Caption & 8
    Case Asc("9"), 105
      lblQuickLeadAccess.Caption = lblQuickLeadAccess.Caption & 9
    End Select