- Foxtable(狐表) (http://foxtable.net/bbs/index.asp)
-- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2)
---- [求助]不同用户登入后隐藏按钮问题 (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=21935)
-- 发布时间：2012/7/27 19:38:00
-- [求助]不同用户登入后隐藏按钮问题
不同用户登入后我想隐藏或显示窗口中的按钮控件代码该怎么写？
If User.Name = "张经理" Then
Forms("窗口名").这里要怎么写？Visible = False
Else
Forms("窗口名").这里要怎么写？ = True
End If
此主题相关图片如下：qq截图20120727193349.png
-- 发布时间：2012/7/27 19:50:00
--
Forms("窗口名").Controls("控件名").Visible = false
-- 发布时间：2012/7/27 20:50:00
--
奇了怪了代码为
If User.Name = "甲" Then
Forms("销售管理窗口").Controls("Button3").Visible = False
Else
Forms("销售管理窗口").Controls("Button3").Visible = True
End If
出现了如图的错误
此主题相关图片如下：qq截图20120727204833.png
-- 发布时间：2012/7/27 21:10:00
--
窗口没有打开.
-- 发布时间：2012/7/27 21:48:00
--
还是将项目上传吧~~郁闷死，窗口打开如图那个位置打开，求教老师指点一二
此主题相关图片如下：qq截图666666.png
| 下载信息 [文件大小： 下载次数： ] | |
 点击浏览该文件:管理项目6.rar |
-- 发布时间：2012/7/28 9:53:00
--
代码应该设置在窗口的AfterLoad事件中，而且要改为：
If _UserName = "甲" Then
Forms("销售管理窗口").Controls("Button3").Visible = False
Else
Forms("销售管理窗口").Controls("Button3").Visible = True
End If
理由你看看这一节最后面的总结：
http://www.foxtable.com/help/topics/2048.htm
[此贴子已经被作者于2012-7-28 9:56:31编辑过]
-- 发布时间：2012/7/28 22:49:00
--
明白了，感谢狐爸的指点，看来帮助要看好多遍才行
-- 发布时间：2012/7/28 23:24:00
--
Forms("销售管理窗口").Controls("Button3").Visible = not ( _UserName = "甲")