Gracias por el codigo, aca tengo otra alternativa
Private Sub TextBox1_KeyDown(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyEventArgs) Handles TextBox1.KeyDown
If e.KeyValue = Keys.F4 Then
MsgBox("F4")
End If
End Sub
extraida de http://support.microsoft.com/?scid=kb;es;822492
link proporcionado por
FNX_NET.
adios y gracias