vb.net中的TabControl快捷键

时间:2014-12-03 21:44:21

标签: vb.net vb6 vb6-migration

我的表单上有一个标签控件。我想为每个页面添加一个快捷键,因此无需鼠标或多个Tab键按下即可使用。

我无法在controltabs属性中找到任何属性来执行此操作。我曾尝试在tabPage的Text属性中使用& -sign,但它不起作用。

2 个答案:

答案 0 :(得分:0)

您可以在tabControl1.SelectTab(i)的{​​{1}}事件中使用KeyDown从一个页面移动到另一个页面。我不确定如何在标签页标签中获得下划线。

您还可以使用每个标签页上的命令框从一个页面转到下一个页面。

答案 1 :(得分:0)

将这样的代码添加到您的表单中,然后相应地进行修改:

Public Class Form1

    Protected Overrides Function ProcessCmdKey(ByRef msg As Message, keyData As Keys) As Boolean
        Select Case keyData
            Case Keys.F1
                TabControl1.SelectedIndex = 0
                Return True
            Case Keys.F2
                TabControl1.SelectedIndex = 1
                Return True
            Case Keys.F3
                TabControl1.SelectedIndex = 2
                Return True
        End Select

        Return MyBase.ProcessCmdKey(msg, keyData)
    End Function

End Class