CTRL + ALT + SHIFT + A打開隱藏表格

我正在創建一個快捷鍵來打開某種形式，我有KeyPreview = true，我正在使用這個代碼，它工作的很棒！CTRL + ALT + SHIFT + A打開隱藏表格

#Region "Shortcuts" 
    Private Sub frmQueuing_KeyDown(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyEventArgs) Handles MyBase.KeyDown 
     If (e.KeyCode = Keys.A AndAlso e.Modifiers = Keys.Control) Then 
      frmMain.show() 
     End If 
    End Sub 
#End Region

但是我試圖通過添加Alt和Shift擴展該代碼，現在它不工作。我不知道爲什麼。

#Region "Shortcuts" 
    Private Sub frmQueuing_KeyDown(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyEventArgs) Handles MyBase.KeyDown 
     If (e.KeyCode = Keys.A AndAlso e.KeyCode = Keys.Shift AndAlso e.KeyCode = Keys.Alt AndAlso e.Modifiers = Keys.Control) Then 
      frmMain.show() 
     End If 
    End Sub 
#End Region

來源

2015-09-17 Cary Bondoc

嘗試使用

#Region "Shortcuts" 
    Private Sub frmQueuing_KeyDown(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyEventArgs) Handles MyBase.KeyDown 
     If (e.Control AndAlso e.Shift AndAlso e.Alt AndAlso e.KeyCode = Keys.A) Then 
      frmMain.show() 
     End If 
    End Sub 
#End Region

這些鏈接將幫助您瞭解KeyEventArgs.KeyCode Property和KeyEventArgs.Alt Property

來源

2015-09-17 08:43:32

仍然沒有工作。我不知道爲什麼？這太奇怪了。 –

現在請檢查，我已經改變了一下代碼。 –

它現在工作，太棒了！非常感謝。 –

之間的差異，您可以使用：

If e.KeyCode = Keys.A And Control.ModifierKeys = (Keys.Control + Keys.Shift + Keys.Alt) Then

來源

2015-09-17 08:53:06 tezzo

CTRL + ALT + SHIFT + A打開隱藏表格

回答

相關問題