Module
Contents
Index 🔎︎

# End Statement

Kết thúc một thủ tục hay khối.

## Cú pháp:

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

## Tham số :

Hãy sử dụng câu lệnh End như theo đây:

## Câu lệnh

End: không cần thiết, nhưng vẫn còn có thể được nhập vào bất cứ nơi nào bên trong một thủ tục để kết thúc thực hiện chương trình.

End Function: Kết thúc một câu lệnh Function.

End If: Đánh dấu kết thúc của một khối If...Then...Else.

End Select: Đánh dấu kết thúc của một khối Select Case.

End Sub: Kết thúc một câu lệnh Sub.

## Thí dụ :

    Sub ExampleRandomSelect

    Dim iVar As Integer

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

        Select Case iVar

            Case 1 To 5

                Print "Đánh số từ 1 đến 5"

            Case 6, 7, 8

                Print "Đánh số từ 6 đến 8"

            Case Is > 8 And iVar < 11

                Print "Lớn hơn 8"

            Case Else

                Print "Phạm vi bên ngoài 1 đến 10"

        End Select

    End Sub