keypress event for command button is not working for "Enter" key why?

[sa_kelkar]

The code which i write below is not working i didn't get why?

keypress event for command button is not working for "Enter" key why?

please reply

Private Sub Command1_KeyPress(KeyAscii As Integer)
If KeyAscii = vbKeyReturn Then
MsgBox "HI"
End If
End Sub

[hspc]

i tried it .. yes it does not work

to detect enter the Click() event is fired when you press enter

[sa_kelkar]

i know it work with click() but why not with "key press "

reply

[Caronte]

Return is not a "normal key", and does not call a "KeyPress" message. Neither it does Ctrl, Bloq Mays...

[doofusboy]

Not sure of the reason(s) why [perhaps the gurus here can tell you], but the following code works in the KeyPress event:

Private Sub Form_KeyPress(KeyAscii As Integer)
If KeyAscii = 13 Then
Label1 = "13"
Label3.Caption = "Enter key."
End If
End Sub

[M Owen]

Doof,

What you're testing against is the scancode of the key pressed whereas Sa is testing against a VB character.

[doofusboy]

MOwen.... of what you say I am well aware.

Happened to notice that one works and one does not.

I just don't know the reason(s) why.

[doofusboy]

Oooops ..............my appologies. Just noticed I was testing the wrong thing. Please excuse my error.

[DeafBug]

I have the same problem a long time ago but I found out that if you use KeyUp or KeyDown, it will work properly. That what I use it most applications I develop here.