求教如何能打开同一个窗体多次,谢谢!!!如有两个窗体;
form1:有command1,command2,command3
form2:有text1
我想按command1,打开form2,form2.text1="aaa"
又按command2,打开form2,form2.text1="bbb"
再按command3,打开form2,form2.text1="ccc"
结果是form2被打开的三次都显示在屏幕上,即屏幕上有四个窗口

解决方案 »

  1.   

    怎么会呢,你新建一个工程试试,我试过了。Option ExplicitPrivate Sub Command1_Click()
        Form2.Show
        Form2.Text1 = "aaa"
        Form2.ZOrder
    End SubPrivate Sub Command2_Click()
        Form2.Show
        Form2.Text1 = "bbb"
        Form2.ZOrder
    End SubPrivate Sub Command3_Click()
        Form2.Show
        Form2.Text1 = "ccc"
        Form2.ZOrder
    End Sub
      

  2.   

    dim frm as form
    set frm = tfrm
    frm.show
    看看这样可以吗?
      

  3.   

    //dim frm as form
    set frm = tfrm
    frm.show
    这样完全可以
      

  4.   

    New一个不就行了,想出多少个都没问题Private Sub Command1_Click()
    Dim test As Form
    Set test = New Form2
    test.Show
    test.Text1 = "aaa"
    End SubPrivate Sub Command2_Click()
    Dim test As Form
    Set test = New Form2
    test.Show
    test.Text1 = "bbb"
    End SubPrivate Sub Command3_Click()
    Dim test As Form
    Set test = New Form2
    test.Show
    test.Text1 = "ccc"
    End Sub
      

  5.   

    先创建form的实例,再调用实例的show
      

  6.   

    先创建form的实例,然后分别显示处理