关键是把待传的变量声明为公共(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