窗体互访

方法一

在Form2内写：  
Dim my_form2 As Form2 = New Form2
    Public Sub New(ByVal sender As Object)
        MyBase.New()
        '该调用是 Windows 窗体设计器所必需的。
        InitializeComponent()
        '在 InitializeComponent() 调用之后添加任何初始化
        my_form2 = CType(sender, Form2) '或者m_parent=directcast(sender,form2)
    End Sub
注：下面的代码写入按钮中也可
Private Sub Form1_Closed(ByVal sender As Object, ByVal e As System.EventArgs) Handles MyBase.Closed
       
        my_form2.Close()
    End Sub

方法二

相互之间调用的话需要用代码：
假设你有两个form 分做为form1 和 form2.

在form1　中　：

publce form2 as new form2
form2.Instance(Me)
form2.show()

在form2 中：
   Dim formtemp As Form1
    Public Function Instance(ByVal frm As Form1)
        formtemp = frm
    End Function

互相调用：
在form2中为　formtemp.textbox1.text = "从form2中更改了form1中的textbox的内容"
在form1中为　form2.textbox1.text = "从form1中更改了form2中的textbox的内容"

以上代码是测试通过了的。

方法三

在模块中:
Public frm As Form
在form1的按钮单击事件中:
frm.Close()
在form2的load事件中:
frm=me