Office中国论坛/Access中国论坛

标题: 自定义两个菜单不同用户名登录显示不同的菜单 [打印本页]

作者: lyajyj 时间: 2012-5-18 14:28
标题: 自定义两个菜单不同用户名登录显示不同的菜单
我定义了两个菜单，一个是管理员可见的，一个是用户可见的，请问该如何写代码，才能实现管理员登录只可见菜单1，用户登录只可见菜单2。
管理员的用户名为：manager
这样写代码为什么不可以呢
If Me.用户名 = manager Then
Application.CommandBars("系统菜单1").Controls("用户设置(&U)").Enabled = True
Application.CommandBars("系统菜单2").Controls("用户设置(&U)").Enabled = False
Else
Application.CommandBars("系统菜单1").Controls("用户设置(&U)").Enabled = False
Application.CommandBars("系统菜单2").Controls("用户设置(&U)").Enabled = True
End If

作者: 轻风 时间: 2012-5-18 14:58
If Me.用户名 = "manager" Then

欢迎光临 Office中国论坛/Access中国论坛 (http://www.office-cn.net/)