MouseWheel, определяющий события прокрутки вверх и вниз

Question

Есть ли способ определить, прокручивает ли мышь вверх или вниз, используя обработчик Mousewheel на сабвуфере? например,

Private Sub PictureBox1_MouseWheel(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles Me.MouseWheel

if mousewheel.scrollup then
        UserZoom = UserZoom + 0.05
        Me.Refresh()
end if


End Sub

Я хочу иметь возможность регулировать значение userzoom вверх или вниз в зависимости от того, движется ли мышь вверх или вниз. Любая помощь будет оценена, ребята

Answer 1

Проверьте свойство Delta MouseEventArgs:

Пример кода:

Private Sub Form1_MouseWheel(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles Me.MouseWheel
    If e.Delta > 0 Then
        Trace.WriteLine("Scrolled up!")
    Else
        Trace.WriteLine("Scrolled down!")
    End If
End Sub

Answer 2

Разобрался.

e.delta передает либо отрицательные, либо положительные значения в соответствии с прокруткой мыши вверх или вниз!