我应该如何处理VB6中类之外的错误(在类方法中引发)？
我应该如何处理VB6中类之外的错误(在类方法中引发)？
提问于 2010-02-25 22:22:21
我想创建一个VB6类的对象，并对该对象调用一个方法。如果错误发生在
我希望该方法能够在方法中引发错误，并在类的外部捕获它，在
我调用该方法的例程。
例如，该类可能包含：
Const cmlngMYERROR As Long = vbObjectError + 1001
Public Sub MyMethod()
...
Err.Raise cmlngMYERROR, Err.Source, Err.Description
End Sub调用例程可能包含：
Private Sub MyCallingRoutine()
Dim objMyObject As ClassName
On Error GoTo ErrorHandler
Set objMyObject = New ClassName
objMyObject.MyMethod
Exit Sub
ErrorHandler:
If Err.Number=clngMYERROR Then
...
End If
End Sub我遇到的问题是，你不能在类的顶部定义公共常量。因此，您不能
使用调用例程错误处理程序中定义的常量检查错误号。最好的是什么？
练习检查调用例程中的错误代码？我在这里正确地使用了错误处理吗？
例子(或者至少是在正确的轨道上)？
提前谢谢。
回答 1
Stack Overflow用户
回答已采纳
发布于 2010-02-25 22:40:32
有一个聪明(丑陋？)模拟公共常量的诀窍:改用公共枚举
Public Enum PseudoConst
cmlngMYERROR = vbObjectError + 1001
End Enum页面原文内容由Stack Overflow提供。腾讯云小微IT领域专用引擎提供翻译支持
原文链接：
https://stackoverflow.com/questions/2334578
复制相关文章
相似问题
腾讯云开发者
