如何在VB6中处理错误处理程序中的错误？

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

导读：我经常在VB6应用程序中遇到这种情况 Private Sub DoSomething On Error Goto err1 Call ProcessLargeBatch1 Call ProcessLargeBatch2 '... more ...' Exit Suberr1: Call Cleanup 'Specific for DoSomething' Call HandleError 'General error handling: Log

我经常在VB6应用程序中遇到这种情况

Private Sub DoSomething

  On Error Goto err1

  Call ProcessLargeBatch1
  Call ProcessLargeBatch2
  '... more ...'

  Exit Sub

err1:
  Call Cleanup 'Specific for DoSomething'
  Call HandleError 'General error handling: Logging,message box,...'

End Sub

清理过程有时会还原操作,回滚事务,删除临时文件等.在大多数情况下,此操作也可能失败.

在这种情况下我该怎么办？我将在错误处理程序中添加一个On Error Resume Next但删除现有的Err对象.向Cleanup添加错误处理程序具有相同的问题.

确保原始错误仍然得到处理/记录的最佳方法是什么？

编辑：另一个问题是我还想通知用户错误.有时重要的是,清理很快发生,我不希望消息框长时间阻止应用程序,并在用户确认错误后进行清理.

解决方法

首先,从Err对象中读取您需要的所有信息,即数字,描述等,然后清除错误并执行您想要的操作.

更改通知用户使用已缓存的值的方式,而不是使用Err对象本身.

（编辑：李大同）

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