窗体全部关闭解决方法

窗体全部关闭
在主界面上,按退出系统的时候,要将所有的窗体都关闭如何做呢?谢谢啦

------解决方案--------------------
VB code
    Dim frm As Form
    For Each frm In Forms
        If Left(frm.Name, 3) = "frm" Then
            Unload frm
        End If
    Next

------解决方案--------------------
探讨
VB code
Dim frm As Form
For Each frm In Forms
If Left(frm.Name, 3) = "frm" Then
Unload frm
End If
Next

------解决方案--------------------
直接写 End 就可以了。
------解决方案--------------------
探讨

直接写 End 就可以了。

------解决方案--------------------
探讨

引用:

直接写 End 就可以了。

+1