子窗体里
   dim f as 主窗体
   public sub FF(byval f1 as 主窗体)
       f=f1
   end sub

主窗体里
    在要显示子窗体的事件里
       dim  k as  子窗体
       k.FF(me)
       k.show

之后就可以在子窗体里控制主窗体里的控件了。