Cách kiểm soát lỗi DLL?

[PhanTuHuong]

Chào mọi người!

Khi biên dịch ra thư viện động DLL từ VB6.0, làm thế nào kiểm soát được lỗi vì VBA chỉ thông báo lỗi 1 cách chung chung thôi (không chỉ rõ lỗi như trong VBA).

Nhờ các cao thủ chỉ dẫn.

 

[Nguyễn Duy Tuân]

Anh phải bẫy lỗi rất chi tiết.
Ví dụ:

Sub DoMethod()
On Error Goto RaiseErr:

x=1/0

RaiseErr:
If Err.Number<>0 then
MsgBox "Error!"
End If

En Sub

 

[smbsolutions]

Bẫy lỗi từ DLL trong VB ko đơn giản thế đâu. Vì khi thông báo trên lớp UI ở VB hay VBA thì nó lại ko biết Source (nguồn) của lỗi ở đâu raise lên. Có 1 bài về món này tương đối ngon nhưng hơi advance level 1 chút (mà hình như tìm mãi chỉ có mỗi bài này trên Internet). Để hôm nào tìm lại code đó (nhưng cũng ko sure vì sợ lâu rồi quên mất ko biết có tìm lại được ko nữa), gửi mọi người tham khảo.

 

[PhanTuHuong]

Nếu đơn giản chỉ vài dòng code thì có thể kiểm soát được. Nhưng chương trình mình đang lập thì 1 thủ tục lên đến 7 trang, rất khó kiểm soát. Khi chuyển sang dll, thủ tục được coi là phương thức nên lỗi báo rất mù mờ, chẳng biết sai ở đoạn nào????

Kinh nghiệm trước mắt: Đầu tiên chạy ngon lành trong VBA, sau đó chuyển sang VB6.0, đã chạy rất ngon!