- Foxtable(狐表) (http://foxtable.net/bbs/index.asp)
-- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2)
---- 窗口中的tabcontor控件显示不出来了，怎么处理？ (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=57896)
-- 发布时间：2014/10/7 12:42:00
-- 窗口中的tabcontor控件显示不出来了，怎么处理？
窗口中的tabcontor控件显示不出来了，怎么处理？
afterload事件写过以下代码，就一直出错了。错误见图片
\'如果不是研发者,那么tab页面"操作目录树"隐藏.
Dim pg As WinForm.TabPage = Forms("非生产性物料采购").Controls("TabControl1")
If user.Name = "开发者" Then
pg.Visible = true \'隐藏操作目录树页面
Else
pg.Visible = false
End If
此主题相关图片如下：截图00.jpg
此主题相关图片如下：截图01.jpg
[此贴子已经被作者于2014-10-7 12:44:13编辑过]
-- 发布时间：2014/10/7 12:56:00
--
Dim pg As WinForm.TabControl = Forms("非生产性物料采购").Controls("TabControl1")
If user.Name = "开发者" Then
pg.Visible = True \'隐藏操作目录树页面
Else
pg.Visible = False
End If
-- 发布时间：2014/10/7 13:01:00
--
(还是显示不出这个tabcontrol1控件，报告以下错误)
.NET Framework 版本：2.0.50727.4984
Foxtable 版本：2014.9.23.1
错误所在事件：窗口,非生产性物料采购,AfterLoad
详细错误信息：
未将对象引用设置到对象的实例。
[此贴子已经被作者于2014-10-7 13:02:20编辑过]
-- 发布时间：2014/10/7 13:12:00
--
把代码都贴出来
-- 发布时间：2014/10/7 13:18:00
--
代码太大，见附件！
下载信息 [文件大小： 下载次数： ] 
点击浏览该文件:eventcode.zip
-- 发布时间：2014/10/7 13:45:00
--
没办法了，只能用备份文件了。神经病了这个软件。
把tabcontrol 放到别的“分区面板”里就能显示了。无语了
-- 发布时间：2014/10/7 13:54:00
--
你这个代码写的不对吧:
Dim pg As WinForm.TabPage = Forms("非生产性物料采购").Controls("TabControl1")
If user.Name = "开发者" Then
pg.Visible = true \'隐藏操作目录树页面
Else
pg.Visible = false
End If
究竟是页面还是页签呀!
-- 发布时间：2014/10/7 14:08:00
--
怎么我看5楼的是乱码？afterload的完整代码是什么？
-- 发布时间：2014/10/7 14:28:00
--
哦，是公司文件有加密系统的原因。我重新发上来。
| 下载信息 [文件大小： 下载次数： ] | |
| 点击浏览该文件:eventcode.zip |
-- 发布时间：2014/10/7 14:30:00
--
很明显，这一句，对应的窗口已经关闭了，怎么能调用它的控件？
Forms("非生产性物料采购").Controls("TabControl1")
[此贴子已经被作者于2014-10-7 14:29:41编辑过]