窗体全部关闭
在主界面上，按退出系统的时候，要将所有的窗体都关闭如何做呢？谢谢啦
[解决办法]

    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

sub MainForm_Unload(cancel)
   Dim frm As Form
    For Each frm In Forms
        Unload frm
    Next
end sub

[解决办法]
直接写 End 就可以了。
[解决办法]

引用:

直接写 End 就可以了。

+1
[解决办法]

引用:

引用:

直接写 End 就可以了。

+1

剩下的事情交给vb自己去弄,哥还管这么多小p事呀,嘿嘿