Foxtable(狐表)用户栏目专家坐堂 → [求助]批量关闭窗口


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

主题:[求助]批量关闭窗口

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


加好友 发短信
等级:三尾狐 帖子:629 积分:4786 威望:0 精华:0 注册:2014/9/17 11:34:00
[求助]批量关闭窗口  发帖心情 Post By:2015/7/20 12:01:00 [只看该作者]

各位老师,我想实现一个功能就是,在我打开窗口一个的时候,可以通过代码控制使其他窗口都被关闭?不知道这个功能能不能实现

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


加好友 发短信
等级:贵宾 帖子:39310 积分:196782 威望:0 精华:1 注册:2015/4/25 9:23:00
  发帖心情 Post By:2015/7/20 12:03:00 [只看该作者]

For Each f As WinForm.Form In Forms
    If f.Opened Then
        f.Close
    End If
Next

Forms("窗口1").open

 


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


加好友 发短信
等级:三尾狐 帖子:629 积分:4786 威望:0 精华:0 注册:2014/9/17 11:34:00
  发帖心情 Post By:2015/7/20 12:13:00 [只看该作者]

谢谢老师

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


加好友 发短信
等级:小狐 帖子:355 积分:3925 威望:0 精华:0 注册:2014/7/29 23:42:00
回复:(大红袍)For Each f As WinForm.Form In Form...  发帖心情 Post By:2015/12/13 17:02:00 [只看该作者]

我还有个导航窗口,并不想把导航窗口关掉。用这个方法的话,窗口又关闭,再打开,屏幕会闪。

我该如何解决呢?

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


加好友 发短信
等级:贵宾 帖子:39310 积分:196782 威望:0 精华:1 注册:2015/4/25 9:23:00
  发帖心情 Post By:2015/12/13 17:06:00 [只看该作者]

For Each f As WinForm.Form In Forms
    If f.Opened AndAlso f.Name <> "导航" Then
        f.Close
    End If
Next

Forms("窗口1").open


 回到顶部