任务栏控件问题(非项目菜单)--开发版项目 - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

Foxtable(狐表) → 用户栏目 → 专家坐堂 → 任务栏控件问题(非项目菜单)--开发版项目

共有4633人关注过本帖树形打印复制链接主题：任务栏控件问题(非项目菜单)--开发版项目

Bin

小大 1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

等级：贵宾帖子：35433 积分：178524 威望：0 精华：3 注册：2013/3/30 16:36:00

Post By：2014/1/13 15:22:00 [显示全部帖子]

Bin

小大 2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

等级：贵宾帖子：35433 积分：178524 威望：0 精华：3 注册：2013/3/30 16:36:00

Post By：2014/1/13 16:05:00 [显示全部帖子]

一样类似的,给你做个参考,具体你自己灵活控制

下载信息 [文件大小：下载次数： ]
点击浏览该文件:管理项目1 (1).foxdb

Bin

小大 3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

等级：贵宾帖子：35433 积分：178524 威望：0 精华：3 注册：2013/3/30 16:36:00

Post By：2014/1/13 17:28:00 [显示全部帖子]

和2楼的帮助帖子是一样的,只不过把操作菜单改为操作任务栏而已

Dim tpb As WinForm.TopicBar = e.Form.Controls("TopicBar1")

tpb.Pages(2).Links("员工1").Visible=False '操作任务栏第三个页面,员工1这个连接

For Each p As WinForm.TopicPage In tpb.Pages

If p.Name="经理" Then

p.Visible=False '操作名称为经理的这个页面.

End If

主题：任务栏控件问题(非项目菜单)--开发版项目