Public Function deine_function (Optional ByVal sprungmarke as Integer = 0)
Select Case sprungmarke
Case 0
 GoTo Start
 'oder einfach nichts rein
Case 1
 GoTo Phase2
Case 2
 GoTo Phase3
End Select
 
Start: 'wenn angegeben
''CODE
 
Phase2:
''CODE
 
Phase3:
''CODE
 
End Function