2013-08-30 3 views
0

Я кодирования некоторые клавиатурные входы в мой код, но у меня возникают проблемы, выяснить, как получить ключи, которые требуют Ctrl, альт или сдвиг ввод также. Я пробовал это, но это просто заставило ключ работать, как только я нажимаю клавишу alt. Я пытаюсь использовать кнопку +, которая не находится на цифровой клавиатуре.ввод с клавиатуры с Ctrl, Alt, Shift + клавиша

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

И Использование keys.Shift ничего не делает вообще

Кроме того, если кто-то есть список которых ключ имеет какое имя в VB.NET, будет понятно. (Или хорошие учебники по этому предмету)

Предпочел бы, если кто-то может разместить код для выбора сазе, ТНХ

+0

F1 на Control.ModifierKeys и Keys Enumeration – peterG

ответ

3

Если вы хотите использовать заявление о случаях, я бы выполнил это:

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 
+0

Thankx! но что такое 'bHandled'? Я не вижу, что он снова используется в коде после его замедления. или это опечатка? – Vahx

+0

Прошу прощения, вам не нужна часть bHandled. – AAzami

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

+0

У меня есть входы на клавиатуре, написанные в заявлении о выборе, вы бы знали, как записать его для этого? 'Дело Keys.Oemplus И e.Modifiers = Keys.Shift BTB_plus.PerformClick() e.Handled = true' Этот код дает мне ошибку для' e.modifiers = keys.shif' часть – Vahx