von B. Kainka
Wer eine Programmiersprache benutzt, hat viele Möglichkeiten. In der Elektronik gibt es immer wieder die Situation, dass man eine Berechnung durchführen oder einen Vorgang automatisieren möchte. Ein geeignetes Werkzeug hierfür ist Visual Basic.
Wer noch kein Visual Basic auf dem PC hat, kann sich VB5CCE laden und installieren. Bereits nach einer halben Stunde kann das erste eigene Programm laufen. Die ersten Schritte werden hier erläutert.
Starten Sie VB5CCE. Es erscheint ein Fenster zum Öffnen eines Projekts. Wählen Sie den Projekttyp „Standard Exe".

Bestätigen Sie die Auswahl mit „Öffnen". In der Entwicklungsumgebung erscheint nun ein leeres Formular. Außerdem sehen Sie die Eigenschaften des Projekts und eine Werkzeugleiste mit Steuerelementen.

Fügen Sie nun eine Schaltfläche (CommandButton) in das Formular ein, indem Sie das entsprechende Symbol mit der Maus anklicken und dann an der gewünschte Stelle und in der gewünschten Größe aufziehen. Die Schaltfläche trägt die Beschriftung „Command1". Diese Eigenschaft Command1.Captions ist rechts unter den Eigenschaften zu sehen und kann verändert werden.

Fügen Sie als nächstes eine TextBox hinzu. Der enthaltene Text ist zunächst noch Text1.Text = „Text". Auch diese Eigenschaft können Sie verändern.

Bisher haben Sie noch keine Zeile Programmtext geschrieben, aber Sie haben bereits ein vollständiges Windows-Programm erstellt. Starten Sie es mit Run/Start oder F5 oder mit dem entsprechenden Start-Symbol (kleines schwarzes Dreieck). Die können auf die Schaltfläche klicken, aber es passiert natürlich noch nichts. Den Text können Sie nach Belieben editieren. Außerdem kann das ganze Programm vergrößert, verkleinert und geschlossen werden. Sobald Sie auf das Schließen-Kästchen klicken, landen Sie wieder in der Entwicklungsumgebung.

Nun soll das Programm eine eigene Funktionalität erhalten. Es soll z.B. das Quadrat der Zahl 13 berechnen und anzeugen. Doppelklicken Sie in der Entwicklungsumgebung auf die Schaltfläche. Es öffnet sich ein Texteditor mit der vorbereiteten Sub Command1_Click(). Eine Sub ist ein Unterprogramm, das in diesem Fall automatisch aufgerufen wird, wenn man auf die Schaltfläche klickt.

Fügen Sie nun die folgenden Zeilen ein:
Ergebnis = 13 * 13
Text1.Text = Ergebnis

Starten Sie das Programm. Wie erwartet erscheint nach einem Klick auf Command1 das Ergebnis 169 im Textfenster.

Ein Steuerelement, das gerade in der Elektronik häufig eingesetzt wird, ist der Schieberegler (ScrollBar). Fühenm Sie einen horizontalen Schieberegler Hscroll1 in Ihr Formular ein.

Mit einem Doppelklick auf das den Regler gelangen Sie wieder in den Editor. Es wurde eine Sub Hscroll1_Change() erzeugt. Diese Sub wird zur Laufzeit des Programms jedes Mal aufgerufen, wenn Sie den Schieber verändern. Nun soll ein entsprechender Zahlenwert im Textfenster angezeigt werden. Lesen Sie den Wert aus der Eigenschaft HScoll1.Value und übergeben Sie ihn an das Textfenster:
Private Sub HScroll1_Change()
Wert = HScroll1.Value
Text1.Text = Wert
End Sub

Zur Laufzeit können Sie nun Wahlenwerte zwischen 0 (ganz links) und 32767 (ganz rechts) erzeugen.
Jetzt fehlt eigentlich nur noch ein wichtiges Steuerelement, nämlich der Timer. Fügen Sie einen Timer irgendwo in das Formular ein, man wird ihn zur Laufzeit nicht sehen. Stellen Sie dann die Eigenschaft Timer1.Interval = 250 (für 250 ms) ein. Wichtig ist auch die Eigenschaft Timer1.Enabled = true. Der Timer ruft dann zur Laufzeit viermal in der Sekunde eine zugehörige Sub auf.

Ein Doppelklick öffnet die Sub Timer1_Timer(). Fügen Sie einige Zeilen ein, die den Schieberegler schrittweise verstellen. Außerdem muss hier der übergebene wert auf den erlaubten Wertebereich begrenzt werden.
Private Sub Timer1_Timer()
Wert = HScroll1.Value
Wert = Wert + 100
If Wert > 32767 Then Wert = 32767
HScroll1.Value = Wert
End Sub

Der Schieber wandert nun gleichmäßig nach rechts. Gleichzeitig zeigt das Textfenster immer den aktuellen Stand. Die Timerfunktion ändert also den Schieberegler, der seinerseits bei jeder Änderung den das Textfenster aktualisiert. Die anderen Funktionen bleiben erhalten. Sie können also jederzeit den Schieber mit der Maus verstellen. Auch der KommanButton funktioniert noch. Ein Klick bringt ganz kurz das Ergebnis 169 in das Textfenster.
Fertig, jetzt können Sie mit Visual Basic arbeiten! Üben Sie etwas mit anderen Berechnungen, oder ändern Sie Eigenschaften der Steuerelemente. Bereits jetzt können Sie eigene Aufgaben definieren und lösen. In den folgen Kursteilen werden einige kleine Programme vorgestellt, die besondern für den Elektroniker interessant sind.