ເນື້ອໃນ

# ຄຳສັ່ງ End

ສິ້ນສຸດໂປຣຊີເຢີ ຫຼື ບລັອກ.

## ໄວຍາກອນ:

    End, End Enum, End Function, End If, End Property, End Select, End Sub, End With

## ພາລາມິເຕີ:

ໃຊ້ຄຳສັ່ງ End ດັ່ງຕໍ່ໄປນີ້:

## ຄຳສັ່ງ

End: ບໍ່ແມ່ນສິ່ງຈຳເປັນ, ແຕ່ສາມາດໃສ່ໄວ້ບ່ອນໃດກໍໄດ້ພາຍໃນໂປຣຊີເຢີເພື່ອຢຸດການປະມວນຜົນໂປຣແກຣມ.

End Enum: ສິ້ນສຸດຄຳສັ່ງ Enum VBA

End Function: ສິ້ນສຸດຄຳສັ່ງ Function.

End If: ໝາຍເຖິງຈຸດສິ້ນສຸດຂອງບລັອກ If...Then...Else.

End Property: ໝາຍເຖິງຈຸດສິ້ນສຸດຂອງຄຳສັ່ງ Property.

End Select: ໝາຍເຖິງຈຸດສິ້ນສຸດຂອງບລັອກ Select Case.

End Sub: ສິ້ນສຸດຄຳສັ່ງ Sub.

End With: ສິ້ນສຸດຄຳສັ່ງ With

## ຕົວຢ່າງ:

    Sub ExampleRandomSelect
    Dim iVar As Integer
        iVar = Int((15 * Rnd) -2)
        Select Case iVar
            Case 1 To 5
                Print "ຕົວເລກແຕ່ 1 ຫາ 5"
            Case 6, 7, 8
                Print "ຕົວເລກແຕ່ 6 ຫາ 8"
            Case Is > 8 And iVar < 11
                Print "ໃຫຍ່ກວ່າ 8"
            Case Else
                Print "ຢູ່ນອກຊ່ວງ 1 ຫາ 10"
        End Select
    End Sub

ກະລຸນາສະໜັບສະໜູນພວກເຮົາ!