 |
你可以在模块中定义一个变量m_ctl，用来保存UserControl。再给模块添加一个函数：
Dim m_ctl
Public Sub MySub(Ctr As Object)
m_ctl = Ctl
End Sub
在UserControl中先调用MySub一次：
MySub Me
以后，你就可以在模块中使用m_ctr调用UserControl的方法和事件了。
此问题由李海回答。
附加关键字：编程, 源程序, programming, source code, Visual Basic, VB, ActiveX技术, activex, com, ado。
|
在模块中调用usercontrol中的自定义事件或方法
