Ausführbare Anweisungen
Aktualisiert: November 2007
Eine ausführbare Anweisung führt eine Aktion aus. Sie kann eine Prozedur aufrufen, an eine andere Stelle im Code verzweigen, verschiedene Anweisungen durchlaufen oder einen Ausdruck auswerten. Eine Zuweisungsanweisung ist eine besondere Variante einer ausführbaren Anweisung.
Im folgenden Beispiel wird eine If...Then...Else-Steuerungsstruktur verwendet, um je nach dem Wert einer Variablen verschiedene Codeblöcke auszuführen. In jedem Codeblock wird eine For...Next-Schleife mit einer festgelegten Anzahl von Wiederholungen ausgeführt.
Public Sub startWidget(ByVal aWidget As widget, _
ByVal clockwise As Boolean, ByVal revolutions As Integer)
Dim counter As Integer
If clockwise = True Then
For counter = 1 To revolutions
aWidget.spinClockwise()
Next counter
Else
For counter = 1 To revolutions
aWidget.spinCounterClockwise()
Next counter
End If
End Sub
Die If-Anweisung im vorherigen Beispiel überprüft den Wert des Parameters clockwise. Wenn der Wert True ist, wird die spinClockwise-Methode von aWidget aufgerufen. Wenn der Wert False ist, wird die spinCounterClockwise-Methode von aWidget aufgerufen. Die If...Then...Else-Steuerungsstruktur endet mit End If.
Die For...Next-Schleife in jedem Block wiederholt den Aufruf der entsprechenden Methode mit einer Häufigkeit, die dem Wert des revolutions-Parameters entspricht.