Istruzione End
Termina una procedura o un blocco.
Sintassi:
End, End Function, End If, End Select, End Sub
Parametri:
Potete usare l'istruzione End come segue:
Istruzione
End: non è necessario, ma può essere inserito in qualunque punto di una procedura per terminare l'esecuzione del programma.
End Function: termina un'istruzione Function.
End If: designa la fine di un blocco If...Then...Else.
End Select: designa la fine di un blocco Select Case.
End Sub: termina un'istruzione Sub.
Esempio:
Sub ExampleRandomSelect
Dim iVar As Integer
iVar = Int((15 * Rnd) -2)
Select Case iVar
Case 1 To 5
Print "Numero da 1 a 5"
Case 6, 7, 8
Print "Numero da 6 a 8"
Case Is > 8 And iVar < 11
Print "Maggiore di 8"
Case Else
Print "Al di fuori dell'intervallo 1-10"
End Select
End Sub