Foxtable(狐表)用户栏目专家坐堂 → 如何在系统菜单中关闭当前窗口


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

主题:如何在系统菜单中关闭当前窗口

美女呀,离线,留言给我吧!
cjl333333333
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:童狐 帖子:200 积分:1706 威望:0 精华:0 注册:2015/2/3 17:04:00
如何在系统菜单中关闭当前窗口  发帖心情 Post By:2016/1/26 9:12:00 [只看该作者]

如何在系统菜单中关闭当前窗口代码怎么写,求助

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


加好友 发短信
等级:狐神 帖子:5015 积分:25363 威望:0 精华:0 注册:2015/8/18 9:21:00
  发帖心情 Post By:2016/1/26 9:26:00 [只看该作者]

只能关闭所有窗口,或者根据名称关闭
For Each f As WinForm.Form In Forms
    f.Close
Next

或者用一个变量记录当前打开的窗口名称,如vars("当前窗口") = "窗口1"。关闭时

Forms(vars("当前窗口")).Close

 回到顶部