标题:怎么设计登陆界面的权限阿?
只看楼主
t3crystal
Rank: 1
等 级:新手上路
帖 子:22
专家分:0
注 册:2006-7-26
 问题点数:0 回复次数:2 
怎么设计登陆界面的权限阿?

有谁知道,怎么设计登陆界面的权限阿?我想当“用户权限”=2( userpurview = 2)时,menuSystemUser.enable = False和MenuEmployee.enable = False这两个菜单窗口禁用

Private Sub MDIForm_Load()
If userpurview = 2 Then
menuSystemUser.Enabled = False
MenuEmployee.Enabled = False
End If
End Sub

我这么加。可是不起作用,我加到登陆界面的Private Sub cmdOK_Click()事件,同样不起作用??

谁能帮帮我啊,谢了!1!!

搜索更多相关主题的帖子: 权限 界面 登陆 设计 
2006-07-31 10:49
leon2
Rank: 3Rank: 3
等 级:新手上路
威 望:7
帖 子:731
专家分:0
注 册:2005-3-18
得分:0 

Private Sub MDIForm_Load()
Debug.Print userpurview
If userpurview = 2 Then
menuSystemUser.Enabled = False
MenuEmployee.Enabled = False
End If
End Sub

运行,看一看在立即窗口的 userpurview 值是不是等于 2

2006-07-31 14:07
t3crystal
Rank: 1
等 级:新手上路
帖 子:22
专家分:0
注 册:2006-7-26
得分:0 
我加入了Debug.Print userpurview语句,可是还是不成功啊 ,一点反应都没有,仍然不能ENABLED
2006-08-01 10:15



参与讨论请移步原网站贴子:https://bbs.bccn.net/thread-81182-1-1.html




关于我们 | 广告合作 | 编程中国 | 清除Cookies | TOP | 手机版

编程中国 版权所有,并保留所有权利。
Powered by Discuz, Processed in 1.959265 second(s), 9 queries.
Copyright©2004-2025, BCCN.NET, All Rights Reserved