Set nForm = New Form1 创建新窗体问题，急等

[leeht]

用如下命令创建个多个form1窗体，为什么关闭其中任意一个其他的都会同时关闭，甚至将form1作为MDI子窗体，也是一样，关闭其中任意一个，连主窗体都同时关闭了，请大家帮忙指点下，多谢了。

Set nForm = New Form1
nForm.Show

应该怎样写？我想可以创建人多个窗体，并可以随便关闭其中一个或几个。

每个的退出代码如何写？

[zzyong00]

[Quote=引用楼主 leeht 的回复:]
关闭其中任意一个其他的都会同时关闭[/Quote]
不可能吧，你的主要代码呢？

[leeht]

其他代码 和这个都没啥关系，主要就是想创建个窗口，结果就出现上面的问题，是不是不能这样做呢？

[leeht]

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

[clear_zero]

你unload里面写了什么？

[slowgrace]

没有出现你说的情况：

'---------------------------------------------------------------------------------------
' Module    : Form1
' Author    : xixi
' Date      : 2009-9-26
' Purpose   : 开多个Form1
'---------------------------------------------------------------------------------------

Option Explicit

Private 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

[睿睿爸爸]

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

[brancyc]

up

[STUDYNET2009]

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

[X800329]

up

[神马都能聊]

'用如下命令创建个多个form1窗体，为什么关闭其中任意一个其他的都会同时关闭，甚至将form1作为
'MDI子窗体，也是一样，关闭其中任意一个，连主窗体都同时关闭了

好神奇的代码，你unload的是谁啊？不是主窗体吧？

[leeht]

有人知道吗？帮帮忙啊