End Statement

Finalitza un procediment o un bloc.

Sintaxi:

End, End Function, End If, End Select, End Sub

Paràmetres:

Utilitzeu l'expressió End de la manera següent:

Expressió

End: No és obligatori, però es pot introduir a qualsevol lloc a dins d'un procediment per finalitzar l'execució del programa.

End Function: Finalitza una expressió Function.

End If: Marca el final d'un bloc If...Then...Else.

End Select: Marca el final d'un bloc Select Case.

End Sub: Finalitza una expressió Sub.

Exemple:

Sub ExampleRandomSelect

Dim iVar As Integer

    iVar = Int((15 * Rnd) -2)

    Select Case iVar

        Case 1 To 5

            Print "Nombre d'1 a 5"

        Case 6, 7, 8

            Print "Nombre de 6 a 8"

        Case Is > 8 And iVar < 11

            Print "Superior a 8"

        Case Else

            Print "Fora de l'interval de l'1 al 10"

    End Select

End Sub