If ... Then und Select Case

Für Bedingungen gibt es 2 unterschiedliche Möglichkeiten:

If...Then(...ElseIf...End If)

Select Case...End Select
Für welche Art man sich nun entscheidet hängt davon ab, wieviele Ergebnisse
es gibt.

Wenn es maximal 2 Möglichkeiten gibt, dann ist ein If die einfachere Methode.

In folgenden Beispielen werden unterschiedliche Code-Anweisungen aufgeführt, um, je nach Farbe eines Auto's diesen Wert auszugeben.

Einfachste Möglichkeit, aber nur ein Ergebnis möglich:

If Auto = "rot" Then MsgBox "Das Auto ist rot!"

2 Möglichkeiten:

If Auto = "rot" Then
	MsgBox "Das Auto ist rot!"
Else
	MsgBox "Das Auto ist nicht rot!"
End If

3 Möglichkeiten:

If Auto = "rot" Then
	MsgBox "Das Auto ist rot!"
ElseIf Auto = "grün"
	MsgBox "Das Auto ist grün!"
Else
	MsgBox "Das Auto ist weder grün noch rot!"
End If

Und nun mit einem Select Case, allerdings hier nur mit 4 Möglichkeiten:

Select Case Auto
	Case Is = "rot"
		MsgBox "Das Auto ist rot!"
	Case Is = "grün"
		MsgBox "Das Auto ist grün!"
	Case Is = "blau"
		MsgBox "Das Auto ist blau!"
	Case Else
		MsgBox "Das Auto ist weder rot, noch grün oder blau!"
End Select

Die letzte Möglichkeit ist ein IIf, hier gibt es aber immer nur 2 Möglichkeiten
und man kann diese nur durch ein weiteres IIf erweitern:

IIf(Kriterium=Wahr, DannMachIrgendwas, SonstEtwasAnderes)
IIf(Kriterium=Wahr,Dann,IIf(Kriterium=Wahr,Dann,Sonst))

Navigation

Access

If ... Then und Select Case

Site Counter