键盘输入,带ctrl,alt,shift +键

时间:2013-08-30 21:46:38

标签: vb.net keyboard-events alt

我正在为我的代码编写一些键盘输入,但是我无法弄清楚如何获得需要 ctrl alt 的键转移输入。 我尝试了这个,但是只要按下 alt 键就可以使关键工作。 我正在尝试使用不在小键盘上的 + 按钮。

Case Keys.ShiftKey And Keys.Oemplus
            BTB_plus.PerformClick()

使用keys.Shift什么都不做

另外,如果某人有一个列表,其中哪个键在VB.NET中有什么名称,那将不胜感激。 (或关于这个主题的好教程)

如果有人可以发布select case语句的代码,那就更愿意了,thx

2 个答案:

答案 0 :(得分:3)

如果你想使用case语句,我会执行此操作:

Dim bHandled As Boolean = False
    Select Case e.Modifiers
        Case Keys.Control
            If e.KeyCode = Keys.Oemplus Then
                MsgBox("KeyPress CTRL + OEMPLUS")
                e.Handled = True
            End If

            If e.KeyCode = Keys.A Then
                MsgBox("KeyPress CTRL + A")
                e.Handled = True
            End If


        Case Keys.Shift
            If e.KeyCode = Keys.Oemplus Then
                MsgBox("KeyPress Shift + OEMPLUS")
                e.Handled = True
            End If

            If e.KeyCode = Keys.A Then
                MsgBox("KeyPress Shift + A")
                e.Handled = True
            End If

    End Select

答案 1 :(得分:0)

这应该让你到那里:)

If e.KeyCode = Keys.Oemplus And e.Modifiers = Keys.Control Then
    MsgBox("KeyPress CTRL + OEMPLUS")
    e.Handled = True
End If

http://msdn.microsoft.com/en-us/library/system.windows.forms.keys.aspx