1.在Form_Click()中
me.hide
if 另一窗口.hwnd<>0 then load 另一窗口
另一窗口.show
2.在Text1_Change()中
另一窗口.Text1.text=text1.text

解决方案 »

  1.   

    假设你的前一窗体是form1,后一窗体是form2
    1、在前一个窗体的鼠标点击事件中写:
    public sub Form_Click()
      Form2.show
      unload me
    End Sub2、在窗体2的text1的change事件中写:
    public sub text1_change()
      Form1!text1.text=text1.text
    end sub
      

  2.   

    Form1 的 
    public sub Form_Click()
        Form2.show
        Form2.text1.text=Form1.text1.text
        Form1.hide
    end sub
    我现在没法试,应该可以的.   
      

  3.   

    前面各位都有一些不全的地方,以下代码经本人测试过,确保可行。
    假设你的前一窗体是Form1,后一窗体是Form2
    在Form1窗体的鼠标单击事件中写:
    Private Sub Form_Click()
            Me.Hide
            Form2.Show
    End Sub
    在Form2窗体的Text1的Change事件中写:
    Private Sub Text1_Change()
            Form1.Text1.Text = Me.Text1.Text
    End Sub
    注:以上代码当你在Form2窗体的Text1中输入时,Form1窗体不会自动显示(因为你没说),如果要显示出来,则要在Private Sub Text1_Change()中加入Form1.Show即可。