Einige Steueranweisungen
If-Then-Else-Anweisung
Diese Anweisung ist sehr wichtig für die logische Folge des Programms. Im folgenden Beispiel wird der Eingabetest für das Excelprogrammierbeispiel vorgestellt, der alle Zahlen <1 oder >20 ablehnt. Desgleichen werden auch alle Texteingaben abgewiesen.
'Diese Variablen zu Beginn
'des Moduls werden benötigt
'Folgended Variablendefinition
'lässt auch Texteingabe zu
Dim Eingabewert As Variant
Dim Ganz As Integer
Dim I As Byte
Sub einmaleins()
Eingabewert = _
InputBox("Eine ganze Zahl zw. 1 und 20", _
"Eingabe")
If Eingabewert < 1 Or Eingabewert > 20 Then
MsgBox "eingegebene Zahl " & _
Eingabewert & " ist falsch!"
Exit Sub
End If
Obiger Ausschnitt der Prozedur einmaleins zeigt die Prüfung des Eingabewertes, die nur Zahlen von 1 bis 20 zulässt. Gebrochene Zahlen werden aufgrund der Zuweisung zu einer Integer-Variablen gerundet.
Diese Seite ist für Mitglieder von akademie.de reserviert.
Möchten Sie die Mitgliedschaft 14 Tage kostenlos testen und den Beitrag komplett lesen?
Oder möchten Sie zunächst mehr über diesen Beitrag erfahren und die Leseproben sehen?
Ich bin bereits Mitglied