2012-04-20 10 views
2

を働いていない私は、次のコードを持っている:ショートキーのCtrl + - VB

Private Sub myGrid_KeyDown(ByVal sender As System.Object, ByVal e As System.Windows.Forms.KeyEventArgs) Handles myGrid.KeyDown 
    If e.KeyCode = Keys.Divide AndAlso e.Control Then 
     Dim response = MsgBox("are you sure to delete a record?", vbYesNo) 
     If response = vbYes Then 
      //Delete the record 
     End If 
    End If 
End Sub 

これは(はCtrl + /ために)動作しますが、問題は、これが-以外の任意のキー異なるために働くということです。キーコードがKeys.Subtract(を使用するにはCtrl + -)と指定しても、それは捕まえられません!

+0

回答が役に立ちましたか? – Abraham

答えて

0

" - "のKeyCodeはKeys.OemMinusです。 Debug.WriteLine(e.KeyCode.ToString())を使用して、押しているキーをテストします。以下は私のために働く:

Private Sub myGrid_KeyDown(ByVal sender As System.Object, ByVal e As System.Windows.Forms.KeyEventArgs) Handles myGrid.KeyDown 
    If e.KeyCode = Keys.OemMinus AndAlso e.Control Then 
     Dim response = MsgBox("are you sure to delete a record?", vbYesNo) 
     If response = vbYes Then 
      '//Delete the record 
     End If 
    End If 
    Debug.WriteLine(e.KeyCode.ToString()) 
End Sub 
関連する問題