Foxtable(狐表)用户栏目专家坐堂 → 关闭窗口


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

主题:关闭窗口

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


加好友 发短信
等级:婴狐 帖子:94 积分:1091 威望:0 精华:0 注册:2012/8/18 16:06:00
关闭窗口  发帖心情 Post By:2013/8/15 21:21:00 [显示全部帖子]

离开时关闭当前所有窗口用什么命令啊

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


加好友 发短信
等级:婴狐 帖子:94 积分:1091 威望:0 精华:0 注册:2012/8/18 16:06:00
  发帖心情 Post By:2013/8/15 23:39:00 [显示全部帖子]

不是整个关闭的!
我的是功能区一切换到功能区二的时候把功能区一中当前所打开的窗体关掉就好了!
有哪位大侠知道请赐教一下!谢谢

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


加好友 发短信
等级:婴狐 帖子:94 积分:1091 威望:0 精华:0 注册:2012/8/18 16:06:00
  发帖心情 Post By:2013/8/16 0:18:00 [显示全部帖子]

我用的是导航栏打开的窗体,一般只有一个活动窗口,但不确定是哪个?
程序是这样的
Dim bar As WinForm.NavBar = e.sender
Select Case bar.SelectedPage.ButtonText
    Case "研发管理主页"
        MainTable = Tables("Main")
    Case "研发项目管理"
        Forms("项目管理窗口").open
    Case "研发档案管理"
        Forms("档案管理窗口").open
    Case "BOM表管理"
        Forms("BOM窗口").open
End Select
若果能在每个CASE的后面再加个离开时关闭窗体的命令就好了!不知道行不行
[此贴子已经被作者于2013-8-16 0:18:48编辑过]

 回到顶部