先定义一个模块级变量:
Dim WithEvent OOO As Object.Class
然后,在代码编辑(Code)界面中,"OOO"会象其它对象名(如TextBox名)一样出现在左边的下拉框中。选中它后,右边的下拉框中就出现了对应的事件。

解决方案 »

  1.   

    纠正:
    Private WithEvents OOO As Object.Class
    ...
      

  2.   

    老兄,差一点了,我几乎没有用过vb,这次是为了验证可连接对象中的事件响应。
    我安你所说的做了,但是下拉框中没有看到对象名,模块级变量的定义有什么特殊的步骤?
    我的定义如下:
    Private WithEvents obj As SourceCompX.SourceObj看看有什么问题?多谢了
      

  3.   

    ===============================================================================
    问题标题                                                 分数 回复 人气 时间 功能 
    ?如何才能看到自己编写的组件对象的事件接口,就象Click事件一样 20 4 25 10-30 15:56 管理 
    ===============================================================================你进入最右边的“管理“功能中就可以给我加分了。以后你有问题就上这来吧。很多高手都能回答你的。