用如下命令创建个多个form1窗体,为什么关闭其中任意一个其他的都会同时关闭,甚至将form1作为MDI子窗体,也是一样,关闭其中任意一个,连主窗体都同时关闭了,请大家帮忙指点下,多谢了。Set nForm = New Form1
nForm.Show应该怎样写?我想可以创建人多个窗体,并可以随便关闭其中一个或几个。每个的退出代码如何写?

解决方案 »

  1.   

    整个程序本来就一个 form1 和一个 aboutFRM ,后来因为需要,想能够实现同时出现多个 form1窗口,就加了上面的代码,结果就出现这样的问题,请各位高手指点啊
      

  2.   

    没有出现你说的情况:'---------------------------------------------------------------------------------------
    ' Module    : Form1
    ' Author    : xixi
    ' Date      : 2009-9-26
    ' Purpose   : 开多个Form1
    '---------------------------------------------------------------------------------------Option ExplicitPrivate Sub Command1_Click()
        Dim frm1 As Form1
        Dim frm2 As Form1
        Dim frm3 As Form1
        
        Set frm1 = New Form1
        frm1.Caption = "1"
        frm1.Show    Set frm2 = New Form1
        frm2.Caption = "2"
        frm2.Show    Set frm3 = New Form1
        frm3.Caption = "3"
        frm3.Show
    End Sub
      

  3.   

    其他代码真的和这个都没啥关系么?
    查查Unload部分吧,是不是写了end之类的结束操作
      

  4.   

    正常情況下,關閉其中一個是不會關閉其它表單的,所要應當是form中代碼在作怪,要檢查檢查。
      

  5.   

    '用如下命令创建个多个form1窗体,为什么关闭其中任意一个其他的都会同时关闭,甚至将form1作为
    'MDI子窗体,也是一样,关闭其中任意一个,连主窗体都同时关闭了好神奇的代码,你unload的是谁啊?不是主窗体吧?