Optionale Parameter

Optionale Parameter müssen beim Funktionsaufruf nicht angegeben werden.

Beispiel:

 

Public Function TuWas(Optional ByVal P1 As Long) As Long

                If IsMissing(P1) Then

                                Return 200

                EndIf

                Return 100

End Function

Der Aufruf dieser Funktion kann parameterlos

TuWas()

oder mit einem angegebenen Parameter

TuWas(10)

erfolgen.

Ob der Parameter beim Aufruf angegeben wurde, kann mit der Funktion IsMissing ermittelt werden.

 

Werden Pflichtparameter und optionale Parameter gemeinsam definiert, müssen die optionalen Parameter am Ende der Funktionsdefinition angegeben werden.

 

Public Function TuWas(ByVal P1 As Long, Optional ByVal P2 As Long, Optional ByVal P3 As Long) As Long

                Return -1 If IsMissing(P2)

                Return -2 If IsMissing(P3)

                Return P1 + P2 + P3

End Function

 

Optionale Parameter können mit einem Defaultwert versehen werden. Damit entfällt die Prüfung auf Existenz mit der Funktion IsMissing.

 

Public Function TuWas(Optional ByVal P1 As Long := 100) As Long

                Return P1

End Function