Ereignisroutine fürs Mausrad unter VB?

[Norbert_50 (Gast)]

Hallo an alle,

eigentlich ist es eine ganz einfache Frage und jeder benutzt die 
Funktion, aber unter VB.Net 2010 und VB.Net 2015 finde ich in den 
Ereignissen für eine Windows-Form keinen Eintrag, der für das Bewegen 
des Mausrades zuständig wäre. Es gibt alles Mögliche (MouseDown, 
MouseEnter, MouseHover, MouseMove, MouseLeave, MouseUp, MouseDown) aber 
eben keine Methode für das Drehen am Mausrad. Auch hier in den 
Foren-Beiträgen wurde ich nicht fündig.

Vielleicht könnte ich mir mit der Methode Scroll behelfen, aber dafür 
bräuchte ich eine Scrollbar für die Form, mit der ich deren Inhalt rauf 
und runter scrollen kann. Doch erstens enthält meine Form keine Elemente 
außerhalb ihrer Grenzen (so dass auch eine Scrollbar sinnlos wäre) und 
zweitens will ich mit dem Scrollrad nicht rauf und runter scrollen, 
sondern den Abbildungsmaßstab für die auf die Form zu zeichnende Grafik 
verändern (und anschließend neu zeichnen).

Hat jemand eine Idee, wie ich zu einer Ereignisroutine fürs Drehen am 
Mausrad nebst zugehörigen Parametern für die Drehrichtung komme (sofern 
sich der Mauszeiger über der Form befindet)?

Viele Grüße

Norbert

[Horst S. (Gast)]

Public Class Form1
    Protected Overrides Sub OnMouseWheel(ByVal e As System.Windows.Forms.MouseEventArgs)
        Debug.WriteLine("MouseWheel" & e.Delta)
    End Sub

End Class

Ausgabe im Immediate-Fenster

[Norbert G. (realist_50)]

Pfantastisch!!!

Habs gerade ausprobiert - die Variable e.delta enthält - je nach 
Drehrichtung am Mausrad - eine positive oder negative Zahl (bei mir ist 
es die Zahl 120). Damit ist mein Problem gelöst.

Ganz herzlichen Dank für den wertvollen Tipp!

Norbert