Foxtable(狐表)用户栏目专家坐堂 → [求助]卸载表后,隐藏的表都出来了


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

主题:[求助]卸载表后,隐藏的表都出来了

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


加好友 发短信
等级:童狐 帖子:233 积分:2602 威望:0 精华:0 注册:2013/9/2 23:31:00
[求助]卸载表后,隐藏的表都出来了  发帖心情 Post By:2016/4/25 16:08:00 [只看该作者]

之前通过表关闭按钮,是隐藏表,然后用户登录系统后只能看到系统导航表(其他表都隐藏了),打开某个表再关闭后,当前表就切回到导航窗口;但是刚才修改了关闭表的代码,修改为卸载表,结果:关闭某个表后,当前表切换到了其他的隐藏表。请教这是怎么回事?

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


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

方法一:做一个计划任务,不断的隐藏那些表;

 

方法二:不要隐藏那些表,直接改成不加载呢?

 

方法三:不要直接卸载表,卸载也不能释放多少内容的。


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


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

方法四:你可以用这种方法隐藏表

 

Dim tab = basemainform.controls("mainpages")
tab.tabpages.remove(tab.tabpages("表C"))


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


加好友 发短信
等级:童狐 帖子:233 积分:2602 威望:0 精华:0 注册:2013/9/2 23:31:00
  发帖心情 Post By:2016/4/25 17:33:00 [只看该作者]

红袍老师提到的几种方法都测试过了,觉得方法三比较适合。谢谢

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


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

3楼的方法,不是也很好用?

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


加好友 发短信
等级:幼狐 帖子:81 积分:621 威望:0 精华:0 注册:2014/11/16 9:55:00
  发帖心情 Post By:2016/5/4 15:13:00 [只看该作者]

用了大红袍的第二种方法,完美解决,多谢帮助!!
另外,我发现如果所有的表都关闭了(只是隐藏,不是卸载),再打开其它的表开始是看不见表的,继续多打开几个(此时依然看不见),直到触发了系统提示 “XX表系统已加载”后,才能看见刚才打开的所有表,请问这是为什么,有什么解决办法没?
我现在的临时解决办法是:先在系统中存入一个空表,例如 “表123”,每次项目启动就打开它,然后,在项目关闭表事件程序中最后一行:Tables("表123").visible = True,相当于强制打开表123,你关了表123,系统马上又让它可见,让用户感觉关不掉它就可以解决上述问题(让系统可见的表中一直有一个关不掉的空表,这样就不会全部关掉所有的表了,也就没这个问题了。),请教,其他狐友还有没有更好的办法?谢谢!

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


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

方法四,是最好的方法

 

Dim tab = basemainform.controls("mainpages")
tab.tabpages.remove(tab.tabpages("表C"))

tab.tabpages.remove(tab.tabpages("表B"))


 回到顶部