CLR: .Net / Mono / Boo / Otros CLR > VB .NET

 No Me Funciona Una Cosita Tan Sencilla Como Esta

(1/1)

ElNapster:
Private Sub TextBox1_KeyPress(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyPressEventArgs) Handles TextBox1.KeyPress
        If (e.KeyChar = Convert.ToChar(Keys.F4)) Then
            My.Forms.extra.Show()
        End If
    End Sub

porque a la hora de yo presionar F4 no me hace nada este evento ?

Gracias por la ayuda....

lencho:
ES VERDAD.
yop probe esto.

 Private Sub TextBox1_KeyPress(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyPressEventArgs) Handles TextBox1.KeyPress
        If (e.KeyChar = Convert.ToChar(Keys.F4)) Then
            MsgBox("HOLA")
        End If
    End Sub

y no muestra nada cuando presiono "F4".
pero cuando pruebo esto

 Private Sub TextBox1_KeyPress(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyPressEventArgs) Handles TextBox1.KeyPress
        If (e.KeyChar = Convert.ToChar(Keys.A)) Then
            MsgBox("HOLA")
        End If
    End Sub

me muestra hola. (Cuando presiono "A")

ElNapster:
:ph34r:  que raro porque en teoria tendria que ser lo mismo , pero nose creo que estamos en las mismas hermando , mira yo he encontrado esto no se si funciona porque no tengo instalado el vb.net aca , pero a como se ve esta bien, pero lo voy a revisar y espero que funcione

--- Código: Text --- Private Sub TextBox1_KeyDown(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyEventArgs) Handles TextBox1.KeyDownSelect Case e.KeyCodeCase Keys.F4MsgBox("F4")End SelectEnd Sub  
 :comp:

lencho:
si. creo que ese esta mas correcto.

Navegación

[0] Índice de Mensajes