共4 条记录, 每页显示 10 条, 页签:
[1]
[浏览完整版]
标题：[讨论]如何关闭当前打开的所有窗口（已解决）
1楼
gamtings 发表于：2009/3/29 13:32:00如何关闭当前打开的所有窗口，如下图更换用户后，已打开的窗口还是打开的，这样就不正确了。
[此贴子已经被作者于2009-3-29 14:02:36编辑过]
2楼
lxl 发表于：2009/3/29 13:40:00看不到图片。
你试试
For Each frm As WinForm.Form In Forms
frm.Close
Next
3楼
lxl 发表于：2009/3/29 13:57:00如果想更换用户后，窗口不是打开的，要把窗口的自动打开属性设为False
4楼
gamtings 发表于：2009/3/29 14:01:00lxl兄2楼的正解，我用的是自定义登录，我把lxl兄发的代码稍修改了一下就搞定了。多谢帮忙！
For Each frm As WinForm.Form In Forms
if frm.name <> "用户登录窗口" then
frm.Close
end if
Next
For Each frm As WinForm.Form In Forms
if frm.name <> "用户登录窗口" then
frm.Close
end if
Next
[此贴子已经被作者于2009-3-29 14:02:02编辑过]
共4 条记录, 每页显示 10 条, 页签:
[1]