Der Vorteil der VB-Grafik ist, daß man mit geringem Aufwand beispielsweise mit der Maus in Grafiken eingreifen kann. Dazu ist die Überwachung von Mausereignissen erforderlich. Anschließend werden die grundsätzlichen Möglichkeiten vorgestellt. Als Bildfeld diene hier ein Formular. Als Mausereignisse bietet das Formular an:
es werden die Mauskoordinaten ausgewertet und können ausgegeben oder für anderweitige Programmaktivitäten ausgewertet werden. Programmbeispiel:
| Private Sub Form_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single) Label1.Caption = X & " " & Y End Sub |
Bei jeglicher Mausbewegung über dem Formular werden im Bereich des Labels die Mauskoordinaten angezeigt. Dabei gelten die mit Scale eingestellten Maßstäbe. Mit dieser Option können z.B. in Kurvendarstellungen Werte genau abgelesen werden ...
reagieren auf das Drücken oder Loslassen von Maustasten. Es kann die Taste sowie die Lage der Maus bestimmt werden und für Reaktionen des
| Private Sub Form_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single) Label1.ForeColor = QBColor(12) End Sub |
Bei Drücken einer beliebigen Maustaste wird die Schriftfarbe hellrot. Mit MouseUp könnte man die Schriftfarbe wieder zurückstellen.
Im Beispielprogramm zur Datenauswertung sind diese Möglichkeiten genutzt, um Meßpunkte in ein Diagramm eintragen bzw. löschen zu können.