如何在vb.net中制作快捷键

Question

我想通过为我的特定程序定义的快捷方式运行特定代码。例如，如果我单击F1或Ctrl+C然后我希望我的程序显示客户列表。我已经使用以下代码尝试了表单的 keydown 事件

If e.KeyCode = Keys.F1 Then
    Form6.button4.performclick()
End If

但这似乎不起作用。任何人都可以帮助我吗？

我在 Visual Studio 2005 中使用 vb.net 来开发我的应用程序

Answer 1

尝试这个：

Private Sub frmCustomerDetails_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
    ' When the form loads, the KeyPreview property is set to True.
    ' This lets the form capture keyboard events before
    ' any other element in the form.
    Me.KeyPreview = True
End Sub

    Private Sub frmCustomerDetails_KeyDown(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyEventArgs) Handles MyBase.KeyDown
    If (e.Alt AndAlso (e.KeyCode = Keys.P)) Then
        ' When Alt + P is pressed, the Click event for the print
        ' button is raised.
        RaiseEvent btnPrintCustomerDetails.Click
    End If
End Sub

来源

虽然，您最好创建自己的事件并引发它，而不是引发按钮的点击事件。