回 帖 发 新 帖 刷新版面

主题:如何同时关闭所有窗体

编了一个软件,前后共打开了十几个窗体,如何在结束时同时关闭所有窗体而不用一个个关闭?

回复列表 (共4个回复)

沙发

如果你不在意偶尔在退出时windows提示说“***遇到问题需要关闭...."的话,那就用 End 吧

板凳

还是一个个关闭好。

3 楼

Dim frm As Form
    For Each frm In Forms
        frm.Hide
        Unload frm
    Next

4 楼

End

我来回复

您尚未登录,请登录后再回复。点此登录或注册