不能有模式窗口,不然下面代码无法运行。
For Each Frm As WinForm.Form In Forms frm.open If ([Enum].getName(Gettype(FormStyleEnum), frm.FormStyle)) <> "主窗口" Then frm.Close End IfNext