Collabora Office 24.04 Help
Beëindigt een procedure of blok.
End, End Enum, End Function, End If, End Property, End Select, End Sub, End With
Gebruik de End-instructie als volgt:
End: Is niet nodig, maar kan overal binnen een procedure ingevoerd worden om de uitvoering van het programma te beëindigen.
End Enum: Beëindigt een VBA-instructie Enum
End Function: Beëindigt een instructie Function.
End If: Geeft het einde van een If...Then...Else blok aan.
End Property: Beëindigt een instructie Property.
End Select: Markeert het einde van een Select Case blok.
End Sub: Beëindigt een instructie Sub.
End With: Beëindigt een instructie With
Sub ExampleRandomSelect
Dim iVar As Integer
iVar = Int((15 * Rnd) -2)
Select Case iVar
Case 1 To 5
Print "Getal van 1 tot 5"
Case 6, 7, 8
Print "Getal van 6 tot 8"
Case Is > 8 And iVar < 11
Print "Groter dan 8"
Case Else
Print "Buiten bereik van 1 tot 10"
End Select
End Sub