如何从vb6模块中引发事件？

Question

我开发了一个自定义的visual basic 6控件并声明了一些自定义事件.是否有可能在vb6中从模块中引发这些事件,或者我需要在我的控件中实现一个特殊的"代理"方法来执行此操作？

Answer 1

的RaiseEvent:

编译错误:
仅在对象模块中有效.

(这是有道理的.)

是的,您需要Friend在您的课程中调用从您的模块中引发事件的方法:

类:

Public Event Click()

Friend Sub OnClick()
  RaiseEvent Click
End Sub

模块:

someVar.OnClick