我有三个窗口,form1,form2,form3,
全部窗口如下,
按下form1按钮进入form2,
form1代码
Option Explicit
Dim aa As New Form2
Private Sub Command1_Click()
aa.Show 1, Me
End Sub
form2代码
Option Explicit
Dim bb As New Form3
Private Sub Command1_Click()
bb.Text1.Text = Text1.Text
bb.Show 1, Me
End Sub
Private Sub Form_Initialize()
Text1.Text = "33b"
End Sub
Private Sub Form_load()
Text1.Text = "22a"
End Sub
form3的代码
Option Explicit
Private Sub Command1_Click()
Form2.Text1.Text = Text1.Text
Unload Me
End Sub
运行效果是点form1的按钮后,弹出form2窗口,点form2的按钮后弹出form3窗口,同时,form2的text1传递给form3,在form3窗口中点按钮后,form3的text1的值要再传递回form2的text1中,但是,前面都很顺利,但从form3回传给form2的时候就有问题了,
我检查了一下,在回form2的时候要运行form2的form_load()
大å¥,çä¸æå