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