Adding Sub To Webbrowser Control

[rsitogp]

Hello,

I wanted to add a keypress sub to the webbrowser control but it doesn't seem to work. Here's my code:

Private Sub WebBrowser1_KeyPress(KeyAscii As Integer)
If KeyAscii = 13 Then
  MsgBox "NO ENTER PLEASE!"
End If
End Sub

Please help!

Thanks In Advance!

[rsitogp]

someone, anyone, everyone?

[Matthew Gates]

Use the GetAsyncKeyState API function.

[Matthew Gates]

Here's an example of how to use it.

Private Declare Function GetAsyncKeyState Lib "user32.dll" _
(ByVal vKey As Long) As Integer


Private Sub Timer1_Timer()
    If GetAsyncKeyState(vbKeyReturn) Then Msgbox "NO ENTER PLEASE!"
End Sub

[rsitogp]

Is there another way, I don't want to check the whole time, only when enter is pressed in the webbrowser, because there are other places on the form, and there is no order of data entry or something of the sort.

[csammis]

If the WebBrowser control doesn't support an event in the dropdown list, IMHO there's no way to *make* it...you have to use workaround API calls

[rsitogp]

I know it's a big question but can i subclass it somehow?