ຟັງຊັນ Err

ສົ່ງຄືນລະຫັດຂໍ້ຜິດພາດທີ່ລະບຸຂໍ້ຜິດພາດທີ່ເກີດຂຶ້ນໃນລະຫວ່າງການເຮັດວຽກຂອງໂປຣແກຣມ.

ໄວຍາກອນ:

Err

ຄ່າທີ່ສົ່ງຄືນ:

ເລກຖ້ວນ (Integer)

ພາຣາມີເຕີ:

ຟັງຊັນ Err ແມ່ນໃຊ້ໃນຊຸດຄຳສັ່ງຈັດການຂໍ້ຜິດພາດເພື່ອລະບຸຂໍ້ຜິດພາດ ແລະ ວິທີການແກ້ໄຂ.

ຕົວຢ່າງ:


Sub ExampleError
On Error Goto ErrorHandler REM ຕັ້ງຄ່າຕົວຈັດການຂໍ້ຜິດພາດ
Dim iVar as Integer
Dim sVar As String
REM ຂໍ້ຜິດພາດເກີດຂຶ້ນຍ້ອນໄຟລ໌ທີ່ບໍ່ມີຢູ່
    iVar = Freefile
    Open "\file9879.txt" for Input as #iVar
    Line Input #iVar, sVar
    Close #iVar
Exit Sub
ErrorHandler:
    MsgBox "ຂໍ້ຜິດພາດ " & Err & ": " & Error$ + chr(13) + "ທີ່ແຖວ : " + Erl + chr(13) + Now , 16 ,"ເກີດຂໍ້ຜິດພາດຂຶ້ນ"
End Sub

ຟັງຊັນການຈັດການກັບຂໍ້ຜິດພາດ