![]() |
Visual BASIC 5&6 mit DMX-Steuerelement I |
Sie haben Visual Basic 5.x oder 6.x auf Ihrem Rechner installiert? Dann kann es ja losgehen:
![]() |
Starten Sie VisualBasic und öffnen Sie ein Standard-EXE Grundgerüst. Danach haben Sie bereits eine fertige Applikation vor sich. Um dies zu testen, führen Sie Ihr Programm einfach einmal aus, indem Sie auf die PlayTaste drücken. ![]() |
![]() |
Lassen Sie uns das Schließen des Programms durch das Hinzufügen eines
"Beenden"-Buttons etwas komfortabler gestalten. Doppelklicken Sie in Ihrer
Werkzeugsammlung auf das "Command Button" Symbol (siehe Abb. Links)
Es erscheint nun ein Button auf Ihrer Anwendung. Positionieren Sie es, klicken Sie mit der rechten Maustaste auf das Element und wählen Sie "Eigenschaften" aus. |
![]() |
Es werden Ihnen nun die Eigenschaften vom "CommandButton" im
Eigenschaftenfenster (in der Programmierungebung rechts unten) angezeigt.
Wenn Sie ein Feld in der Eigenschaftsseite auswählen, erscheint im unteren Teil des Eigenschaftenfensters eine kurze Beschreibung . In der Abbildung links hat die Eigenschaft "Caption" den Fokus. Die Eigenschaft "Caption" dient nur der Beschriftung (hier: eines Buttons) und ist für VB nicht weiter von Bedeutung. Sie können die Beschriftung nun durch klicken in das Textfeld neben Caption ändern. Bitte tragen Sie "B&eenden" ein. Das &-Zeichen weist VB an, den darauf folgenden Buchstaben als Shortcut zu verwenden. Der Buchstabe wird auf dem Button unterlegt dargestellt und ist im laufendem Programm mit Alt + Zeichen erreichbar. Die Eigenschaft "(Name)" kennzeichnet den Objekt-Namen des Buttons. Unter diesem Namen ist Ihr Button später im Programmcode erreichbar. Dieser Name ist wärend der Programmierung sehr wichtig und sollte nicht von dem (vom Programmierer) vergebenen Namen abweichen, damit die Beispielprogramme auch funktionieren. |
Machen Sie nun einen Doppelklick auf Ihren neu beschrifteten Button. Mit dem Doppelklick haben Sie von der Objekt-Ansicht in die Code-Ansicht gewechselt und VBasic eine Sub-Funktion vom Typ "Private" erstellt. Fügen Sie nun der Sub Funktion "Unload Me" hinzu. Ihr Code sollte jetzt wie im nebenstehenden Kasten aussehen. |
|
Gehen Sie wieder in den Entwurfsmodus (Programm stoppen) und fügen Sie folgenden Code in "Private Sub cmdBeenden_Click()" ein:
Private Sub cmdBeenden_Click() 'Sicherheitsabfrage Antwort = MsgBox("Sind Sie sicher?", vbYesNo, "Super Frage!") 'Abfrage auswerten If Antwort = vbNo Then Exit Sub 'Programm Beenden Unload Me End Sub |
![]() |
Setzen Sie einen Haltepunkt, indem Sie mit der Maus auf dieselbe Stelle am Code-Rahmen klicken, wie in der Abbildung links gezeigt oder gehen Sie mit dem Cursor in die entsprechende Zeile und drücken Sie F9.
Haltepunkte werden mit einem roten Punkt gekennzeichnet und weisen VB an, an dieser Stelle vor dem Ausführen der Zeile anzuhalten. |
Das Programm bleibt jetzt an dem Haltepunkt stehen (Pause). Sie erkennen dies daran, dass die Playtaste und die Stoptaste Blau sind. Ausserdem erkennen Sie an dem gelben Balken, wo Sie sich derzeit im Programm befinden. Sie können das Programm normal fortführen, indem Sie auf "Play" klicken oder F5 drücken.
Klicken Sie auf Nein, wenn die MessageBox erscheint, um das Programm nicht zu beenden.
Danach klicken sie erneut auf Beenden.
VB bleibt wieder an gleicher Stelle stehen. Lassen Sie uns nun genau analysieren, was bei den einzelnen Befehlen passiert. Halten Sie dazu Ihren Mauszeiger über die Variable "Antwort".
Es wird Ihnen in einem ToolTipText der Inhalt von "Antwort" angezeigt. Sie können sich den Inhalt von Antwort auch im Direktfenster anzeigen lassen. Dieses erreichen Sie über das Menü "Ansicht/Direktfenster".
Schreiben Sie in das Direktfenster: "?Antwort" und drücken Sie Enter.
Da Antwort leer ist, wird Ihnen auch nichts angezeigt. Tun sie das gleiche mit vbNo.
Das ? vor der Variable weist das Direktfenster an, den Inhalt auszugeben (PRINT-Befehl).
Halten Sie nun den Mauszeiger über vbNo im Code-Fenster. Es erscheint der Inhalt als Tooltiptext. In beiden Fällen wird Ihnen der Inhalt der Variable angezeigt. Dabei ist die erste Methode zwar etwas komfortabler, funktioniert aber möglicherweise nicht immer..
![]() |
Drücken Sie nun F8, um den Code schrittweise auszuführen. Beobachten Sie bei jedem Schritt, was mit den Variablen passiert und wie sich VB verhält. Probieren Sie auch aus, was jeweils bei Ja und bei Nein passiert. |
Stoppen Sie Ihr Programm und klicken Sie im Menü "Datei" auf "Projekt Speichern unter.."
Legen Sie ein Unterverzeichnis namens "DMX" an, indem Sie mit der rechten Maustaste in das "Speichern unter..."-Fenster und dann auf "Neu/Neuer Ordner" klicken.
Öffnen Sie den Ordner und legen Sie einen weiteren Ordner mit dem Namen "V000" an. Wechseln Sie in diesen Ordner und speichern Sie dort Ihre Formdatei und anschliessend Ihre Projektdatei ab.
Das Unterverzeichnis "V000" dient zur Versionspflege, und um Fehler bei Folgeversionen besser nachvollziehen zu können.
Nachdem Sie Ihr Projekt gespeichert haben, erstellen Sie doch einmal ein ausführbares Programm.
Gehen Sie hierzu auf das Menü "Datei/Projekt1.exe erstellen" und klicken Sie auf "OK".
Beenden Sie nun Visual Basic.
Führen Sie anschliessend das Programm aus. Sie finden es in Ihrem Visual Basic Verzeichnis unter /DMX/V000 .
![]() |
Beenden Sie Ihr Programm und starten Sie Visual Basic wieder. Öffnen Sie Ihr aktuelles Projekt, indem Sie auf das Register "Aktuell" klicken und Enter drücken. |
![]() |
Wechseln Sie nun wieder in die Objekt Ansicht, indem Sie im Projekt-Explorer auf Ihre Form doppelklicken.
TIP: Den Projekt-Explorer erreichen Sie über das Menü "Ansicht" .
|
Eine Variablendeklaration ist bei Visual Basic nicht zwingend erforderlich, das Programm macht es selbst. Wir empfehlen dennoch die folgende Vorgehensweise, weil sie Fehler durch doppelte Namensvergabe und falschen Aufruf absolut unterbindet. Das dient der Programmiersicherheit.
![]() |
Wechseln Sie wieder in die Code-Ansicht, indem Sie im Projekt-Explorer auf das "Code Anzeigen" Symbol klicken
|
Bitte verwenden Sie stets Sie den Befehl: Option Explicit.
Dieser Befehl weist VB an, nur solche Variablen zu akzeptieren, die deklariert wurden.
Fügen Sie hierzu den Befehl ganz am Anfang des Programmcodes ein.
Führen Sie nun Ihr Programm aus und klicken Sie auf Beenden.
VB meldet einen Fehler: "Variable nicht Definiert", Das beweist, daß "Option Explicit" funktioniert.
Sie declarieren die Variable indem Sie "Dim Antwort As Byte" am Anfang der Prozedur "Private Sub cmdBeenden_Click()"
den Code wie folgt einfügen:
Private Sub cmdBeenden_Click() Dim Antwort As Byte 'Sicherheitsabfrage Antwort = MsgBox("Sind Sie Sicher?", vbYesNo, "Super Frage!") 'Abfrage auswerten If Antwort = vbNo Then Exit Sub 'Programm Beenden Unload Me End Sub |
Läufts? Wenn ja: dann Gratulation!
Schon mehrfach wurden über "ToolTipTexte" erwähnt. Wahrscheinlich fragen Sie sich schon die ganze Zeit, was das für ein merkwürdiger Name ist. Tooltiptexte sind Texte, die erscheinen, wenn Sie Ihren Mauspfeil einige Sekunden lang über ein Element halten.
Stoppen Sie Ihr Programm und rufen Sie die Eigenschaftsseiten Ihres Buttons "BEENDEN" auf.
Geben Sie einen Text in dem Eigenschaftsfeld ToolTipText ein, wie z.B.:"Hiermit beenden.".
Probieren Sie aus, was passiert, wenn Sie Ihr Programm starten und die Maus über Ihren Beenden-Button halten.
Projekt-Sourcecode als EXE downloaden Selbstentpackend!
Projekt-Sourcecode als LZH downloaden