主题：[求助]独立窗体的自动关闭

Dim frm As WinForm.Form = Forms.ActiveForm
If frm IsNot Nothing Then
frm.close

End If

Forms("xxx").Show

这样不行吗？我没测试

这是不是 写进 每一个 窗体的 打开事件中 ？另外

forms ("xxx") 是指当前窗口名字吧 。这样每个窗体都写一次 ，那不是比较麻烦 。窗体特多的呀 。。。

在菜单按钮中，先关闭所有打开的独立窗口。

然后再打开，你想要打开的窗口。

For Each frm As WinForm.Form In Forms
    If frm.FormStyle = 2 AndAlso frm.Opened Then
        frm.Close()
    End If
Next

不是很明白 。这段代码改设置在哪里呢 ？？

谢谢 ！！