窗口1
Public Class Form1.....
 Private Sub ContorlTextChanged(ByVal sender As System.Object, ByVal e As            System.EventArgs) Handles miszx_sjyj.TextChanged
        isModify = True
        initButton()
    End Sub
......
dim fff1 as new fff
fff1.BlankBuild(me)
end class定义的一个类a.vb
Public Class fff
  Public Function BlankBuild(ByRef obj As Control) As Boolean
  .....
   For i = 0 To obj.Controls.Count - 1
     AddHandler obj.Controls.Item(i).TextChanged, New System.EventHandler(AddressOf 
       ContorlTextChanged)‘??????
   next
  end function
end class我现在问题就是:在类fff中怎样引用Form1中的ContorlTextChanged
(好像可以传函数指针,不知道怎样实现)