No funciona pulsación tecla
Publicado por ferr.ox06 (3 intervenciones) el 23/05/2010 20:27:29
Hola a todos. Estoy haciendo una calculadora en VB .Net, y quería que cuando se pulsase una tecla (en este caso, la tecla 1), saliera el nº, así no tendrías que darle con el ratón. Sin embargo, tras ponerlo, no hace nada, pero tampoco da error. Espero que podáis decirme una solución; gracias por adelantado y os dejo el trozo en cuestión.
----------------------------------------------------------------------------------------
Private Sub Canvas_KeyDown(ByVal sender As Object, ByVal e As KeyEventArgs)
If (e.Key = Key.D1) Then
TextBox1.Text = TextBox1.Text & 1
End If
End Sub
----------------------------------------------------------------------------------------
Private Sub Canvas_KeyDown(ByVal sender As Object, ByVal e As KeyEventArgs)
If (e.Key = Key.D1) Then
TextBox1.Text = TextBox1.Text & 1
End If
End Sub
Valora esta pregunta
0