ฟังก์ชัน Error

ส่งกลับข้อความแสดงข้อผิดพลาดที่สอดคล้องกับหมายเลขข้อผิดพลาดที่ระบุ

ไวยากรณ์

ข้อผิดพลาด [ (หมายเลขข้อผิดพลาด)]

อาร์กิวเมนต์ errornumberเสริมสามารถเป็นหมายเลขข้อผิดพลาดที่ถูกต้องใดก็ได้ ถ้า errornumber เป็นหมายเลขข้อผิดพลาดที่ถูกต้อง แต่ไม่ได้กําหนดไว้ ข้อผิดพลาดจะ ส่งกลับสตริง "ข้อผิดพลาดที่กําหนดโดยแอปพลิเคชันหรือวัตถุที่กําหนด" ถ้า errornumber ไม่ถูกต้อง จะเกิดข้อผิดพลาดขึ้น ถ้า errornumber ถูกละไว้ ข้อความที่สอดคล้องกับข้อผิดพลาดขณะทํางานล่าสุดจะถูกส่งกลับ ถ้าไม่มีข้อผิดพลาดขณะทํางานเกิดขึ้น หรือ errornumber เป็น 0 ฟังก์ชัน Error จะส่งกลับสตริงความยาวเป็นศูนย์ ("")

ข้อสังเกต

ตรวจสอบการตั้งค่าคุณสมบัติของวัตถุ Err เพื่อระบุข้อผิดพลาดขณะทํางานล่าสุด ค่าส่งกลับของฟังก์ชัน Error จะสอดคล้องกับคุณสมบัติ Description ของวัตถุ Err

ตัวอย่าง

ตัวอย่างนี้ใช้ฟังก์ชัน Error เพื่อพิมพ์ข้อความแสดงข้อผิดพลาดที่สอดคล้องกับหมายเลขข้อผิดพลาดที่ระบุ

Dim ErrorNumber
' Loop through values 61 - 64.
For ErrorNumber = 61 To 64
    ' Print error to Immediate window.
    Debug.Print Error(ErrorNumber)    
Next ErrorNumber