VB类的EVENT,SUB,FUNCTION的区别。
主要不明白EVENT,RAISEEVENT和调用一个子程序/函数什么区别?窗体:
Option Explicit
Dim WithEvents myObject As Class1
Private Sub Form_Click()
myObject.Test
End Sub
Private Sub Form_Load()
Set myObject = New Class1
End Sub
Private Sub myObject_thisEvent()
MsgBox "事件被触发 "
End Sub类模块:
Option Explicit
Event thisEvent()
Sub Test()
RaiseEvent thisEvent
End Sub可以运行,但是如果我把FORM_CLICK里面的myObject.Test改成RaiseEvent thisEvent就出错了,即使我在类模块里面EVENT前加PUBLIC
主要不明白EVENT,RAISEEVENT和调用一个子程序/函数什么区别?窗体:
Option Explicit
Dim WithEvents myObject As Class1
Private Sub Form_Click()
myObject.Test
End Sub
Private Sub Form_Load()
Set myObject = New Class1
End Sub
Private Sub myObject_thisEvent()
MsgBox "事件被触发 "
End Sub类模块:
Option Explicit
Event thisEvent()
Sub Test()
RaiseEvent thisEvent
End Sub可以运行,但是如果我把FORM_CLICK里面的myObject.Test改成RaiseEvent thisEvent就出错了,即使我在类模块里面EVENT前加PUBLIC
myObject.Test
End Sub
改成
Private Sub Form_Click()
myObject_thisEvent
End Sub
而且最重要的:EVENT和函数调用究竟有什么区别?