End Statement

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