| 网站首页 | 业界新闻 | 小组 | 威客 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛 | 
登录
注册
用户控制面板
搜索
道具
风格
短消息
论坛展区
帮助
编程论坛 → 开发语言 → 『 VB6论坛 』 → Private Sub DisplayMenu()什么意思，求助！
我的收件箱(0)
欢迎加入我们，一同切磋技术
用户名：   
 
密　码：  
共有 737 人关注过本帖
标题：Private Sub DisplayMenu()什么意思，求助！
只看楼主 加入收藏
winter_cry
Rank: 1
等　级：新手上路
帖　子：3
专家分：0
注　册：2012-10-31
结帖率：100%
楼主
收藏
 已结贴√  问题点数：20 回复次数：7 
Private Sub DisplayMenu()什么意思，求助！
Private Sub DisplayMenu()
If Adodc1.Recordset.Fields("角色") = "普通操作员" Then
   glyszfrm.Enabled = False
   lbglfrm.Enabled = False
   mmxgfrm.czysz.Enabled = False
   xtcshfrm.xtcsh.Enabled = False
   
End If
想进行权限设置，但把代码写上去后没提示错误页眉执行该命令，不懂啊。
搜索更多相关主题的帖子: 操作员　角色　False　
2012-12-08 17:32
winter_cry
Rank: 1
等　级：新手上路
帖　子：3
专家分：0
注　册：2012-10-31
第 2 楼
收藏
 得分:0 
各路神仙帮忙看看呀
2012-12-08 17:33
Artless
Rank: 19Rank: 19Rank: 19Rank: 19Rank: 19Rank: 19
等　级：贵宾
威　望：103
帖　子：4211
专家分：28888
注　册：2009-4-8
第 3 楼
收藏
 得分:10 
以下是引用winter_cry在2012-12-8 17:32:33的发言：

Private Sub DisplayMenu()
If Adodc1.Recordset.Fields("角色") = "普通操作员" Then
   glyszfrm.Enabled = False
   lbglfrm.Enabled = False
   mmxgfrm.czysz.Enabled = False
   xtcshfrm.xtcsh.Enabled = False
   
End If
想进行权限设置，但把代码写上去后没提示错误页眉执行该命令，不懂啊。

Adodc1.Recordset.Fields("角色") <> "普通操作员"

无知
2012-12-08 17:37
winter_cry
Rank: 1
等　级：新手上路
帖　子：3
专家分：0
注　册：2012-10-31
第 4 楼
收藏
 得分:0 
回复 3楼 Artless
不明白  Private Sub DisplayMenu() 是什么意思呀
2012-12-08 17:44
Artless
Rank: 19Rank: 19Rank: 19Rank: 19Rank: 19Rank: 19
等　级：贵宾
威　望：103
帖　子：4211
专家分：28888
注　册：2009-4-8
第 5 楼
收藏
 得分:0 
以下是引用winter_cry在2012-12-8 17:44:03的发言：

不明白  Private Sub DisplayMenu() 是什么意思呀

找本书看看吧

无知
2012-12-08 19:04
xieshengsen
Rank: 2
等　级：论坛游民
帖　子：1
专家分：10
注　册：2012-11-19
第 6 楼
收藏
 得分:10 
好像是“设计等级访问权限，不符合的隐藏”。
2012-12-09 10:58
墨竹花
Rank: 1
等　级：新手上路
帖　子：2
专家分：0
注　册：2012-12-15
第 7 楼
收藏
 得分:0 
是不是自定义函数啊？？
2012-12-15 17:45
wink5000
Rank: 1
等　级：新手上路
帖　子：3
专家分：0
注　册：2012-12-30
第 8 楼
收藏
 得分:0 
自定义了一个过程，不过没有看到end sub！
2012-12-30 09:13
快速回复：Private Sub DisplayMenu()什么意思，求助！
数据加载中...
 
　　　



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

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