问一个FORM 间传递参数的小问题
有两个form ---form1 form2

form1 上有 控件textbox1 button1
form2 上有 控件 label1

现在需要是用户在form1的textbox1 填入名字之后，按下button1，弹出form2，form2的label1的内容为textbox1的内容



下面是我写的代码————————————————————————————
首先在form1 加入
#Region "升级支持 "

Private Shared m_vb6FormDefInstance As Form1

Private Shared m_InitializingDefInstance As Boolean

Public Shared Property DefInstance() As Form1

Get


If m_vb6FormDefInstance Is Nothing OrElse m_vb6FormDefInstance.IsDisposed Then

m_InitializingDefInstance = True

m_vb6FormDefInstance = New Form1()

m_InitializingDefInstance = False

End If

DefInstance = m_vb6FormDefInstance

End Get

Set

m_vb6FormDefInstance = Value

End Set

End Property

#End Region


在form2也同理

然后

在form1的button1的click事件里写

form2.definstance.show()


然后在form2的form load 事件里写
me.label1.text=form1.definstance.textbox1.text


————————————————————————————————


运行结果是：

在form1的textbox1输入“王磊”
按button1
------正常弹出form2

但是form2的label1里面的内容是空的


请问我的代码问题在哪呢？谢谢！

[解决办法]
Dim myform As Form1 = CType(Me.Owner, form)






Dim myform As New form2
myform.Owner = Me
myform.Show()