ການຊ່ວຍເຫຼືອ LibreOffice 26.2
ສິ້ນສຸດໂປຣຊີເຢີ ຫຼື ບລັອກ.
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