Почему происходит задержка в моем событии MouseUp, когда я щелкаю правой кнопкой мыши, а не левой? - PullRequest
0 голосов
/ 09 февраля 2020

Я пытаюсь обнаружить левые и правые щелчки, которые происходят в рамке изображения, причем строка состояния и ячейки отображают разные вещи в зависимости от того, какой тип щелчка обнаружен. Первоначально я делал это с помощью события MouseDown, но это вызывало задержку как левого, так и правого щелчка. Когда я переключил MouseUp, задержка для щелчков левой кнопкой мыши была значительно минимизирована, но задержка для щелчков правой кнопкой мыши сохранялась. Под задержкой я подразумеваю, что когда я делаю 5 кликов с разумной скоростью, записываются только 1-й, 3-й и 5-й клики. Если щелкнуть правой кнопкой мыши достаточно медленно, все 5 могут быть обнаружены, но для моих целей мне нужно обнаруживать их при щелчке с нормальной (160 ударов в минуту) скоростью.

Public Sub Image1_MouseUp(ByVal Button As Integer, _
  ByVal Shift As Integer, ByVal X As Single, _
  ByVal Y As Single)
    Application.ScreenUpdating = False
    Application.EnableEvents = False

    Range("X2:Z2").Insert

    Range("X2") = Round(X)
    Range("Y2") = Round(Y)

    If Button = 1 Then
        Application.StatusBar = "Hit Recorded"
        Range("Z2") = "H"
        ClearStatusBar
    ElseIf Button = 2 Then
        Application.StatusBar = "Miss Recorded"
        Range("Z2") = "M"
        ClearStatusBar
    End If

    If Application.WorksheetFunction.Ceiling_Math(X, 10) >= 310 Then
        Range("X2") = 310
    End If
    Application.ScreenUpdating = True
    Application.EnableEvents = True

End Sub

Буду признателен за любую помощь .

Добро пожаловать на сайт PullRequest, где вы можете задавать вопросы и получать ответы от других членов сообщества.
...