Hay una opcion para desactivar las teclas de desplazamiento en visual studio?
Publicado por Edson Roa (1 intervención) el 18/11/2020 23:48:17
Me ayudarian con mi duda panas, Gracias
Valora esta pregunta
0
Keys.Left, Keys.Right, Keys.Home, Keys.End, Keys.Next, Keys.PageUp, Keys.Up, Keys.Down
Public Class MiForm
' ... ... ...
' ... ... ...
Shadows Event KeyDown(sender As Object, e As KeyEventArgs)
Private Sub UnoKeyDown(sender As Object, e As KeyEventArgs)
Select Case e.KeyCode
Case Keys.Left, Keys.Right, Keys.Home, Keys.End, Keys.Next, Keys.PageUp, Keys.Up, Keys.Down
RaiseEvent KeyDown(Me, Nothing)
Case Else
RaiseEvent KeyDown(Me, e)
End Select
End Sub
' ... ... ...
Private Sub MiTextBox_KeyDown(sender As Object, e As KeyEventArgs) Handles MiTextBox.KeyDown
' Estas 2 lineas de codigos pueden ser escritas en otro procedimiento KeyDown, cuando ES NESECARIOBN de desactivar teclas
e.Handled = True
UnoKeyDown(sender, e)
End Sub
' ... ... ...
' ... ... ...
Private Sub OtraTextBox_KeyDown(sender As Object, e As KeyEventArgs) Handles OtraTextBox.KeyDown ' SI NECESARIO
'
' Utilization normale de este evento, si desactivar nada
End Sub
Private Sub MiTextBox_KeyDown(sender As Object, e As KeyEventArgs) Handles MiTextBox.KeyDown
Select Case e.KeyCode
Case Keys.Left, Keys.Right, Keys.Home, Keys.End, Keys.Next, Keys.PageUp, Keys.Up, Keys.Down ' lista de las teclas a ignorar
e.Handled = True
Exit Sub
End Select
End Sub