VB - 8: Maßeinheiten

Äpfel oder Birnen?

Zur Übung wenden wir gleich noch eine weitere Methode an: MOVE. Wir schreiben dazu in das Click-Ereignis unserer Hauptform folgende Zeile:

    Private Sub Form_Click()
        Kugel.Move Kugel.Left + 100, Kugel.Top + 100
    End Sub

Beispielprojekt laden

Dies bewirkt, daß bei jedem Klicken auf die Hauptform, unser Image "Kugel" ein Stück weiter nach rechts und nach unten bewegt wird bis sie schließlich irgendwann aus dem Blickfeld verschwindet (wenn wir die Form mit der Maus vergrößern, können wir sehen, daß sie noch da ist ).

Kugel-Move - Methode zum Bewegen
Kugel.Left - Left-Eigenschaft von Kugel, gibt den augenblicken linken Rand von Kugel an
Kugel.Top - Top-Eigenschaft von Kugel, gibt den augenblicken oberen Rand von Kugel an

Mit jedem Klick wird zu Left und Top jeweils 100 addiert, d.h. der linke/obere Rand wird verschoben und damit das Objekt selber. Was bedeuten aber die 100?

Nun, das ist davon abhängig, welche Maßeinheit wir für unsere Form eingestellt haben. Dies können wir unter der Eigenschaft "ScaleMode" im Property-Fenster ändern. Standardmäßig wird stets in "1 - Twip" gerechnet. Twips sind eine "künstliche" Einheit. Ihr Vorteil liegt darin, daß sie unabhängig von der aktuell eingestelllten Bildschirmauflösung ist. Ein Bildschirm (Screen-Objekt) ist stets 9600 Twips breit. Weitere mögliche ScaleMode-Werte:

0 - user - benutzerdefiniert (kann über ScaleWidth und ScaleHeight angegeben werden)
2 - Points - Punkte (wie bei Schriftarten verwendet)
3 - Pixel - kleinste Einheit, die auf dem Monitor dargestellt werden kann (wie bei Bildschirmauflösungen verwendet)
4 - Character - Zeichen (bei Texten sinnvoll)
5 - Inches - Zoll
6 - Millimeter
7 - Zentimeter

Probiert einfach mal verschiedene Einstellungen aus und testet das Ergebnis.