Foxtable(狐表)用户栏目专家坐堂 → [讨论]如何关闭当前打开的所有窗口(已解决)


  共有19064人关注过本帖树形打印复制链接

主题:[讨论]如何关闭当前打开的所有窗口(已解决)

帅哥哟,离线,有人找我吗?
gamtings
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:一尾狐 帖子:495 积分:4013 威望:0 精华:0 注册:2008/10/10 19:36:00
[讨论]如何关闭当前打开的所有窗口(已解决)  发帖心情 Post By:2009/3/29 13:32:00 [只看该作者]

如何关闭当前打开的所有窗口,如下图更换用户后,已打开的窗口还是打开的,这样就不正确了。

图片点击可在新窗口打开查看

[此贴子已经被作者于2009-3-29 14:02:36编辑过]

 回到顶部
帅哥哟,离线,有人找我吗?
lxl
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信 一级勋章
等级:MVP荣誉狐 帖子:858 积分:6071 威望:0 精华:19 注册:2008/9/1 9:13:00
  发帖心情 Post By:2009/3/29 13:40:00 [只看该作者]

看不到图片。
你试试
For Each frm As WinForm.Form In Forms
    frm.Close
Next


 回到顶部
帅哥哟,离线,有人找我吗?
lxl
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信 一级勋章
等级:MVP荣誉狐 帖子:858 积分:6071 威望:0 精华:19 注册:2008/9/1 9:13:00
  发帖心情 Post By:2009/3/29 13:57:00 [只看该作者]

如果想更换用户后,窗口不是打开的,要把窗口的自动打开属性设为False

 回到顶部
帅哥哟,离线,有人找我吗?
gamtings
  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:一尾狐 帖子:495 积分:4013 威望:0 精华:0 注册:2008/10/10 19:36:00
  发帖心情 Post By:2009/3/29 14:01:00 [只看该作者]

lxl兄2楼的正解,我用的是自定义登录,我把lxl兄发的代码稍修改了一下就搞定了。多谢帮忙!

For Each frm As WinForm.Form In Forms
  if frm.name <> "用户登录窗口" then   
    frm.Close
  end if
Next
[此贴子已经被作者于2009-3-29 14:02:02编辑过]

 回到顶部