关键是把待传的变量声明为公共(public)''新建一个窗体,放入一个 textbox,加入代码:
Public str1 As StringPrivate Sub Form_Load()
Text1.Text = "窗口一的文本框内容"
str1 = Text1.Text
Load Form2
Form2.Show
End Sub'''再建一个 FORM2,代码:
Private Sub Form_Load()
Text1.Text = Form1.str1
End Sub
Public str1 As StringPrivate Sub Form_Load()
Text1.Text = "窗口一的文本框内容"
str1 = Text1.Text
Load Form2
Form2.Show
End Sub'''再建一个 FORM2,代码:
Private Sub Form_Load()
Text1.Text = Form1.str1
End Sub
form2.text2.text=form1.text1.text
一定有用!!!!!!!!
给分!!!!!!!!!!
QQ:124650070