KeyPres EventArgs.KeyChar

[keesstruijk]

ik krijg de fout melding 'KeyCode' is not a member of 'System.EventArgs'.
ik heb 2 programma's waar ik dit gebruikt bij het ene geen probleem en bij het andere programma krijg ik de fout melding ??
weet iemand wat ik fout doe ??
mogelijk een instelling of zo

Private Sub txtZoekOpID_KeyDown(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyEventArgs) Handles txtZoekOpID.KeyDown

Dim Keycode As Short = EventArgs.KeyCode
Dim Shift As Short = EventArgs.KeyData \ &H10000
TextBox1.Text = "key down"
If KeyCode = System.Windows.Forms.Keys.Return Then
Me.Close()
ElseIf KeyCode = CDbl("8") Then
txtUitvoer.Text = "Bacspace"
ElseIf KeyCode = System.Windows.Forms.Keys.F1 Then
txtUitvoer.Text = "F1 "
End If
End Sub

 

[keesstruijk]

heb het al gevonden