Запрет нажатий сочетаний клавиш для определенного процесса - VB
Формулировка задачи:
Всем привет! В Visual Basic я новичок, но мне нужно решить одну задачу. Запретить нажатие следующих клавиш
Alt + tab
alt + Ctrl + del
Alt + F4
Ctrl + Shift + Esc
для Windows Xp, Windows 7 и Windows 8.
Допустим. я запускаю свою программу (с запретом нажатий клавиш), далее нужное мне приложение "proga.exe" И уже в "proga.exe" не работают сочетания клавиш.
P.S.
Я не пишу какой-либо вирус. Просто необходимо таким образом перекрыть багоюз в одном приложении. Надеюсь на ваше взаимопонимание и поддержку.
Решение задачи: «Запрет нажатий сочетаний клавиш для определенного процесса»
textual
Листинг программы
- Dim prevent As Boolean ' Флаг запрещения
- Select Case lParam.VkCode
- Case vbKeyF4
- ' Проверяем ALT
- If lParam.flags And LLKHF_ALTDOWN Then
- prevent = True
- End If
- Case vbKeyTab
- ' Проверяем ALT
- If lParam.flags And LLKHF_ALTDOWN Then
- prevent = True
- End If
- Case vbKeyEscape
- ' Проверяем CTRL и SHIFT
- If GetAsyncKeyState(vbKeyShift) < 0 And GetAsyncKeyState(vbKeyControl) < 0 Then
- prevent = True
- End If
- End Select
- If prevent Then
- LowLevelkbdProc = -1
- Exit Function
- End If
ИИ поможет Вам:
- решить любую задачу по программированию
- объяснить код
- расставить комментарии в коде
- и т.д