KeyDown Event ?

[RS]

I would like to interface with the Win32 API and I need the HWND handle
to Form1 ( I'm assuming it is Me.Handle) and I need Form1 to respond to
keyboard input. Using the information from a previous question I have
entered the following into my IDE and cannot get any response:


Friend WithEvents Form1 As System.Windows.Forms.Form

Private Sub Form1_KeyDown(ByVal sender As System.Object, _
ByVal e As System.Windows.Forms.KeyEventArgs) Handles _
Form1.KeyDown

Dim i As Integer = 0

Select Case e.KeyCode
Case Keys.Left
i += 1
'etc..................
End Select

End Sub

How can I get my code to respond to keyboard events ?

TIA RS

 

[Tom Spink]

Friend WithEvents Form1 As System.Windows.Forms.Form

What in the name of Option Strict is that!! SCNR

Are you calling this code from within a form? If so, then you don't need
that line.

Your Handles clause, on the KeyDown method, should read Handles
MyBase.KeyDown

Also, you *may* need to set your form's KeyPreview property to True.

--
HTH,
-- Tom Spink, Über Geek

Please respond to the newsgroup,
so all can benefit

"Maybe it's a game called 'Punish the User'"


I would like to interface with the Win32 API and I need the HWND handle
to Form1 ( I'm assuming it is Me.Handle) and I need Form1 to respond to
keyboard input. Using the information from a previous question I have
entered the following into my IDE and cannot get any response:


Friend WithEvents Form1 As System.Windows.Forms.Form

Private Sub Form1_KeyDown(ByVal sender As System.Object, _
ByVal e As System.Windows.Forms.KeyEventArgs) Handles _
Form1.KeyDown

Dim i As Integer = 0

Select Case e.KeyCode
Case Keys.Left
i += 1
'etc..................
End Select

End Sub

How can I get my code to respond to keyboard events ?

TIA RS

 

[RS]

Alrighty : ) , and thank you.

I would like to interface with the Win32 API and I need the HWND handle
to Form1 ( I'm assuming it is Me.Handle) and I need Form1 to respond to
keyboard input. Using the information from a previous question I have
entered the following into my IDE and cannot get any response:


Friend WithEvents Form1 As System.Windows.Forms.Form

Private Sub Form1_KeyDown(ByVal sender As System.Object, _
ByVal e As System.Windows.Forms.KeyEventArgs) Handles _
Form1.KeyDown

Dim i As Integer = 0

Select Case e.KeyCode
Case Keys.Left
i += 1
'etc..................
End Select

End Sub

How can I get my code to respond to keyboard events ?

TIA RS