VB6 模态窗体上的textbox改变时候再弹出一个窗体,并且弹出窗体上的数据随之更新,怎么实现?

解决方案 »

  1.   

    form1Private Sub Command2_Click()
        Form2.Show 1
    End Subform2Private Sub Text1_Change()
        Form3.Text1 = Text1
        Form3.Show 1
    End Sub
      

  2.   

    主窗体(Form1)有一个Text1,再在工程中添加一个Form2.且Form2中也放置一个Text1.
    在Form1中放置如下代码
    Private Sub Text1_Change()
      Form2.Show
      Form2.Text1 = Text1
      Text1.SetFocus
    End Sub
    你试试效果吧,不知可否满意
      

  3.   

    理论上,楼上诸位的有些道理,但要实现楼主说的“并且弹出窗体上的数据随之更新”,需要先修改新弹出窗口的相应数据,再show出来,才能够实现的。语句的顺序是有讲究的。
      

  4.   

    Private Sub Form_Load()
    Form2.Show
    Text1.SetFocus
    End SubPrivate Sub Text1_Change()
    Form2.Label1 = Text1
    End Sub
    可以定义一个窗体级变量,让这个变量在两个窗体之间传递变量值,先加载窗体1 ,就不会老是弹窗了