如何在标准模块中触发自定义控件的事件。

来源:百度知道 编辑:UC知道 时间:2024/09/27 15:28:01
我正准备制作一个自定义控件:UserControl1
控件中有自定义事件:Event SelectText()

另在控件工程中的标准模块中使用了回调函数,现需在标准模块中触发自定义控件的SelectText() 事件,请教各位:
编程工具:VB6.0

标准模块不能添加控件,所以只能使用下面的方法。
在用户控件添加一个Public Sub

比如
Public Sub SelText()
Call '你触发SelectText的那个事件
End Sub

比如说你在 Text1_Click使用了RaiseEvent SelectText

你就这样编写

Public Sub SelText()
Call Text1_Click
End Sub