-- 作者:独行侠
-- 发布时间:2017/6/22 14:10:00
-- [求助]系统登陆后主界面显示
我设定了用户分组,系统进去后 有好多表,
此主题相关图片如下:881l387f8%bk0vxd09i3x80.png
我想让除了 开发者外的人登上去,看不见这些表
我设计了一个 Forms("菜单"). 可以进行各种操作,我想让其他用户只能看到这个窗口,
此主题相关图片如下:){sl8whf0dhce_b`b}sfb.png
我在项目属性的 AfterOpenProject 中添加事件
Select Case User.Group Case "组长","副组长","仓库管理员","会计","成员","采购员","维修员" Tables("人员").Visible = False Tables("物资").Visible = False Tables("zhc").Visible = False Tables("ssc").Visible = False Tables("yjc").Visible = False Tables("dc").Visible = False Tables("hc").Visible = False Tables("wjj").Visible = False Tables("入库单").Visible = False Tables("订购单").Visible = False Tables("报修").Visible = False Tables("搜索").Visible = False Forms("菜单").Open() End Select
但是其他人员登录后
此主题相关图片如下:zg1yry@}4_0lq_k7t6$pjm.png
只有 开发者进去后 才会显示 我设计的 Forms("菜单")
这是怎么回事? 如何才能实现我想要的那样的效果
其他成员进去后只显示 Forms("菜单"). 开发者进去后可以看见表和 Forms("菜单").
|