End utasítás
Befejez egy eljárást vagy egy blokkot.
Szintaxis:
End, End Function, End If, End Select, End Sub
Paraméterek:
Használja az End utasítást a következőként:
Utasítás
End: nincs rá szükség, de egy eljáráson belül bárhol megadhatja a program futtatásának megállítása céljából.
End függvény: Befejez egy Function utasítást.
End If: Az If...Then...Else blokk végét jelöli.
End Select A Select Case blokk végét jelöli.
End Sub: Befejez egy Sub utasítást.
Példa:
Sub ExampleRandomSelect
Dim iVar As Integer
iVar = Int((15 * Rnd) -2)
Select Case iVar
Case 1 To 5
Print "1 és 5 közötti szám"
Case 6, 7, 8
Print "6 és 8 közötti szám"
Case Is > 8 And iVar < 11
Print "Nagyobb mint 8"
Case Else
Print "1-10 tartományon kívül eső"
End Select
End Sub