End Statement
Finas proceduron aŭ blokon.
Sintakso:
End, End Function, End If, End Select, End Sub
Parametroj:
Uzu la ordonon End ĉi tiel:
Ordono
End ne estas deviga, sed oni povas enmeti ĝin ie ajn en proceduro por ĉesigi la ruladon de programo.
End Function: Ĉesigas ordonon Function.
End If: Markas la finon de bloko If...Then...Else.
End Select: Markas la finon de bloko Select Case.
End Sub: Finas ordonon Sub.
Ekzemplo:
Sub ExampleRandomSelect
Dim iVar As Integer
iVar = Int((15 * Rnd) -2)
Select Case iVar
Case 1 To 5
Print "Numero inter 1 kaj 5"
Case 6, 7, 8
Print "Numero inter 6 kaj 8"
Case Is > 8 And iVar < 11
Print "Pli ol 8"
Case Else
Print "Ekster la amplekso de 1 ĝis 10"
End Select
End Sub