Select-Case-Anweisung
Eine Select-Case-Anweisungen ist eine elegantere Variante zu If-Then-Anweisungen, um mehrere hintereinander folgende Bedingungen abzufragen
Allgemein
Select Case Var1 Case Ausdruck1 ' Variable Var1 hat den Ausdruck Ausdruck1 Case Ausdruck2 ' Variable Var1 hat den Ausdruck Ausdruck2 Case Else ' Variable Var1 hat keinen der vorhandenen Ausdrücke End Select
Dim Var1 As Integer Select Case Var1 Case 1 ' Variable Var1 hat den Wert 1 Case 2 ' Variable Var1 hat den Wert 2 Case 3 ' Variable Var1 hat den Wert 3 Case Else ' Variable Var1 hat keinen der vorhandenen Werte End Select
Dim Var1 As Integer Select Case Var1 Case 1, 3, 5 ' Variable Var1 hat den Wert 1, 3 oder 5 Case 2, 4, 6 ' Variable Var1 hat den Wert 2, 4 oder 6 Case Else ' Variable Var1 hat keinen der vorhandenen Werte End Select
Dim Var1 As String Select Case Var1 Case "eins" ' Variable Var1 hat den Wert eins Case "zwei" ' Variable Var1 hat den Wert zwei Case "drei" ' Variable Var1 hat den Wert drei Case Else ' Variable Var1 hat keinen der vorhandenen Werte End Select
Dim Var1 As Integer Select Case Var1 Case <= 0 ' Variable Var1 ist kleiner oder gleich NULL Case == 1 ' Variable Var1 ist 1 Case >= 2 ' Variable Var1 ist größer oder gleich 2 End Select