在 VB.Net 中使用 Enter 键的 Tab 键功能

问题描述

我有一个包含近 20 个文本框和 5 个组合框的表单，一个控件依赖于另一个，现在我想以这样的方式编写表单的代码，按 Enter 键和 Tab 键应该具有相同的功能.

I have a form with nearly 20 Textbox and 5 Combobox and one control in dependent on the other, Now I want to write the code for the form in such a way that, Pressing Enter Key and Tab Key should have the same functionality.

就像按下 Tab 键一样，当我按下 Enter 键时，焦点移动到下一个控件也应该执行.同样，当我按下 Enter 键时，在按键事件中写入了一些流程代码，但是当我按下 Tab 键时也应该执行此操作.

Like on pressing Tab Key the focus moves to next control should also be performed when I press the Enter Key. Similarly when I press the Enter Key, there is some process code written in key press event but this should also be performed when I press the Tab Key.

推荐答案

我在 Winforms 中完成它的方法是使用 SelectNextControl 方法.

The way that I have accomplished it in Winforms is by using the SelectNextControl Method.

即

Private Sub TextBox_KeyPress(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyPressEventArgs)
    Dim tb As TextBox
    tb = CType(sender, TextBox)

    If Char.IsControl(e.KeyChar) Then
        If e.KeyChar.Equals(Chr(Keys.Return)) Then
            Me.SelectNextControl(tb, True, True, False, True)
            e.Handled = True
        End If
    End If
End Sub

如果您使用的是 WPF，则可以使用 TraversalRequest

If you are using WPF you can use TraversalRequest

即

Private Sub TextBox_KeyDown(ByVal sender As Object, ByVal e As System.Windows.Input.KeyEventArgs)
    Dim tb As TextBox
    tb = CType(sender, TextBox)

    If e.Key = Key.Return Then
        tb.MoveFocus(New TraversalRequest(FocusNavigationDirection.Next))
    ElseIf e.Key = Key.Tab Then
        Exit Sub
    End If
End Sub

至于拦截 Tab 键看看这个 Stackoverflow 问题.

As far as intercepting the Tab Key take a look at this Stackoverflow question.

这篇关于在 VB.Net 中使用 Enter 键的 Tab 键功能的文章就介绍到这了，希望我们推荐的答案对大家有所帮助，也希望大家多多支持跟版网！