ຄຳສັ່ງ 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
ກະລຸນາສະໜັບສະໜູນພວກເຮົາ!

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