- Код: Выделить всё
Private Sub TextBox1_KeyDown(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyEventArgs) Handles TextBox1.KeyDown
If e.KeyCode = Keys.Tab Then
...
TextBox1.Focus()
End If
End Sub
Private Sub TextBox1_KeyDown(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyEventArgs) Handles TextBox1.KeyDown
If e.KeyCode = Keys.Tab Then
...
TextBox1.Focus()
End If
End Sub
Ramzes писал(а):Можно руками ловить...вот так:
- Код: Выделить всё
Private Sub TextBox1_KeyDown(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyEventArgs) Handles TextBox1.KeyDown
If e.KeyCode = Keys.Tab Then
...
TextBox1.Focus()
End If
End Sub
Сейчас этот форум просматривают: нет зарегистрированных пользователей и гости: 67