kgmmurugesh Ответов: 1

Как остановить событие helprequested, когда пользователь нажал shift F1?

I пользователь HelpRequested событие для обработки справки. Он отлично работает с клавишей F1, но он также работает с Shift F1, Я хочу остановить Shift F1.

Что я уже пробовал:

Private Sub KGMERP_HelpRequested(sender As Object, hlpevent As HelpEventArgs) обрабатывает меня.HelpRequested

Попробуй

Процесс.Начало("https://youtu.be/oXz5Cg9T6cw")

Поймать ex как исключение
msgbox(ex)
Конец Попытки

Конец Подводной Лодки

1 Ответов

Рейтинг:
11

clwprogrammer 

Private ShiftDown As Boolean
Private Sub Form1_HelpRequested(ByVal sender As Object, ByVal hlpevent As System.Windows.Forms.HelpEventArgs) Handles Me.HelpRequested
    If ShiftDown = False Then
        hlpevent.Handled = True
        MsgBox("Hello World")
    End If
End Sub

Private Sub Form1_KeyDown(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyEventArgs) Handles Me.KeyDown
    ShiftDown = e.Shift
End Sub

Private Sub Form1_KeyUp(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyEventArgs) Handles Me.KeyUp
    ShiftDown = False
End Sub

kgmmurugesh

Спасибо

kgmmurugesh

Так-то лучше.

если мой ... компьютер.Клавиатура.Тогда ShiftKeyDown
выход из субмарины
за endif

hlpevent.Обработано = Истина
MsgBox("Привет, Мир")