在FormA中
Public Class FormA
    Inherits System.Windows.Forms.Form
    ...
    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        Dim frmB As New FormB
        frmB.frmA = Me'这里传递实例
        frmB.ShowDialog()
    End Sub
End Class在FormB中,
Public Class FormB
    Inherits System.Windows.Forms.Form
    ......
    Public frmA As FormA
    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        Me.TextBox1.Text= frmA.TextBox1.Text
    End Sub
End Class

解决方案 »

  1.   

    或是:
    Public Class FormA
        Inherits System.Windows.Forms.Form
        Public Shared isread As Integer
       End ClassPublic Class FormB
        Inherits System.Windows.Forms.Form
        ......
        Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
            me.textbox1.text=frmA.isread 
        End Sub  End Class
      

  2.   

    http://community.csdn.net/Expert/topic/3616/3616076.xml?temp=.8406488
      

  3.   

    http://blog.csdn.net/zhzuo/archive/2004/04/05/22028.aspx
      

  4.   

    已经有太多的人问过这个问题了。可以去search一下。