Ignoring keystrokes

[rodentcentre]

I want to ignore certain keystrokes in my application, I have done it before but cannot remember how I did it...I thought it was along the lines of

Private Sub txtCheckNums_KeyPress(KeyAscii As Integer)
    
    Select Case KeyAscii
        'backspace, delete, 0 to 9, and comma keys
        Case 8, 46, 48 To 57, 188

        'ignore anything else
        Case Else

            'i thought this would ignore the keystroke
            Chr (0)

    End Select

End Sub

Thanks to anyone who helps me out.

 

[Golom]

You need

KeyAscii = 0

rather than Chr (0)

 

[rodentcentre]

Ahhh, I knew it was just that easy...thanks a lot for your help