Trapping the Shift key

yossarian · July 3rd, 2003, 04:11 PM

I'm having trouble with trapping the Shift key in the KeyDown or KeyPress event of a combobox. I want to ignore the key. Any help or guidance is appreciated. Thanks in advance.

alex_read · July 6th, 2003, 02:00 PM

For another time, each character on your keyboard has a corresponding ascii number value of the key - i.e. in ascii, the letter A is equivalent to 65, B to 66 etc.

Typing in msgbox keycode under the combobox_keypress event will give you the number of the key you're testing, which you can then place into an if statement to check against like this...

Code:

Private Sub Combo1_KeyDown(KeyCode As Integer, Shift As Integer)
    If KeyCode <> 32 Then
        MsgBox "The key " & Chr(KeyCode) & " was pressed!"
    End If
End Sub

yossarian · July 7th, 2003, 08:03 PM

I've got that part -- the keycode is 16 that I test. The problem is that even when setting the keycode to 0, it still doesn't disable the Shift key. Any Ideas?