Key press problem

diegoblin · October 5th, 2006, 11:40 AM

Hi there, i have a bit of a problem with this. I used this

Code:

Private Sub Form_KeyPress(KeyAscii As Integer)
   Char = Chr(KeyAscii)
   If Char = 27 Then Unload Me
End Sub

in my form because i want to unload it when the user press the "esc" key; i have used it in a form and it worked, but now i have a combo box(i preselected an element of it by using text property ) on it and nothing happens.
thanks in advance

gbianchi · October 5th, 2006, 11:43 AM

hi there..

did you set the form property "key preview" to true???

that property catch every key stroke before it send to the control that has the focus.

HTH

Gonzalo

BrianWren · October 5th, 2006, 12:18 PM

You've got this all mixed up.
Let's take a capital âAâ for example.
KeyAscii into the KeyPress Sub would be 65.
This is the same as the return value of Asc("A").
Chr(KeyAscii) would return the String âAâ. (Chr() returns strings...)

There is no string for the escape key, so I don't really know what the value of Char is in your routine.

You already have the ASCII value when you enter the Sub. So just use

Code:

Private Sub Form_KeyPress(KeyAscii As Integer)
   If KeyAscii = 27 Then Unload Me
End Sub

I'm not certain that Unload Me will work (a quick experiment would confirm or deny), but I'm sure about the ASCII conversion mixup.

diegoblin · October 5th, 2006, 02:10 PM

Hey there, thanks for the help, both of you were right.
but the weird thing is did it the way i posted it and it worked... :P
but when i set the keypreview property to true it did give an error because of the type mismatch.