VB6 – 如何在运行时捕获异常或错误

发布时间：2020-12-17 07:19:03 所属栏目：百科来源：网络整理

导读：我在VB6中开发了一个应用程序.在客户端环境中,它会引发运行时错误,我无法在调试器下重现这些错误.有没有办法得到堆栈跟踪或错误的位置？我创建了日志文件和 I used Err.Description,Err.Source but it gives blank values. 请帮我. my method(...... On Err

我在VB6中开发了一个应用程序.在客户端环境中,它会引发运行时错误,我无法在调试器下重现这些错误.有没有办法得到堆栈跟踪或错误的位置？
我创建了日志文件和

I used
Err.Description,Err.Source
but it gives blank values.

请帮我.

my method(......

    On Error GoTo Error_Handler

             .........
    Error_Handler : 
                  writeToLogFile(Err.Source,Err.Description)

解决方法

在写入日志文件之前,您可能已经完成了清除Err对象的操作.这非常非常容易.您要做的是,一旦发现错误,请在执行任何其他操作之前获取错误消息.然后将错误消息传递给您正在使用的任何日志记录例程.例如.：

Dim sMsg As String

On Error Goto ErrHandler

' ...code here...

Exit Function

ErrHandler:
sMsg = "Error #" & Err.Number & ": '" & Err.Description & "' from '" & Err.Source & "'"
GoLogTheError sMsg

（编辑：李大同）

【声明】本站内容均来自网络，其相关言论仅代表作者个人观点，不代表本站立场。若无意侵犯到您的权利，请及时与联系站长删除相关内容!