你在窗体中自定义一个事件,
然后所有控件要产生事件时
RaiseEvents
同时在类中
Dim WithEvents Frm as Form1
就行

解决方案 »

  1.   

    To:Bardo(巴顿) 這和在窗体中定義一個過程 然後調用該過程有什麼區別呢?
    我不是在一個窗体里這樣做,別的窗体也可复用這個Class
      

  2.   

    Public Event XXX(参数 As 类型,……)  'XXX为你的 事件名在 你需要 事件发生的 地方, 加上RaiseEvents XXX(参数 As 类型,……)
      

  3.   

    To:sonicdater(发呆呆) 你和Bardo(巴顿)產意思一樣,這和定義一個過程然後想調用的時候就調用的做法一樣
    我是想用繼承的思想,在Class中做出控件的某一事件的處理,窗體里面對該事件不用寫代碼(當然可以在窗体的該事件里寫入別的代碼),問題是控件數組怎麼解決?
      

  4.   

    呵呵 我的分數不少吧? Help 一下 可以再加分的