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))