首页 诗词 字典 板报 句子 名言 友答 励志 学校 网站地图
当前位置: 首页 > 教程频道 > 开发语言 > VB >

怎么在VB自定义类的方法中生成异常,并传到调用者进行处理

2012-01-23 
如何在VB自定义类的方法中生成错误,并传到调用者进行处理如题,VB自定义类,在此类的方法中用err.raise生成

如何在VB自定义类的方法中生成错误,并传到调用者进行处理
如题,VB自定义类,在此类的方法中用err.raise生成自定义错误。但我发现传不出来,只能在方法中处理。我试过,在普通过程中可以用raise方法生成自定义错误并并传出,调用者可以捕获并进行处理。请问如何实现类模块自定义错误的传出?谢谢各位!

[解决办法]
不要说vb6解决不了这样的问题,实在不想听!
你可以在你的类class1中定义一事件!
public event error()
然后在适当的时候扔出错误
Public function clssub1() as string
On Error GoTo errHandle
Dim a, b, c As Integer
a = 1
b = 0
c = a / b
Exit Sub
errHandle:
RaiseEvent error

End Sub
然后在form中接收这个事件!
Dim WithEvents myClass As Class1
Private Sub myClass_error()
MsgBox "error "
End Sub



[解决办法]
在VB的IDE里,Err.Raise 会直接被系统处理,不会传给调用者处理,但编译后就可以了。
[解决办法]
结帖。
[解决办法]
为何不尝试使用一个自定义事件?
Public Events ErrorHandle(Byval ErrNumber As Long, Byval ErrDescription As String)

然后发生错误的时候,你可以触发这个事件
RaiseEvent ErrorHandle(xxx, "xxxxxxxxxxxxxxxxxxxxxxxx ")

热点排行