建立一个标准模块(moudle),在其中为想要操作的窗体定义一个公共实例:
Public frm2 as new frim2()
然后
在窗体form2的Load事件中写:frm2=me
接下来你就可以用frm2这个公共实例来做你要做的事了:)
如在form1中写:frm2.textbox1.text=me.textbox1.text
form2:
Public Shared txtDemo As String
Private Sub Form2_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
Me.TextBox1.Text = txtDemo
End Sub
form1调用:
Form2.txtDemo = "123"
Dim frmNew As New Form2()
frmNew.Show()