以文本方式查看主题 - Foxtable(狐表) (http://foxtable.com/bbs/index.asp) -- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2) ---- 菜单中的某一功能组隐藏 (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=115990) |
-- 作者:deliangzhaoe -- 发布时间:2018/3/18 10:14:00 -- 菜单中的某一功能组隐藏 1.用窗口设计器中的菜单编辑器设计了窗口的菜单,如果是用户分组为管理员的用户登录,则显示“用户管理”功能组;如果是其他用户登录,则隐藏该功能组。 2.另外,如何将登录用户的信息显示在窗口的状态栏中? 我现在窗口的afterload中设置了这样的代码: Dim dr As DataRow = DataTables("users").Find("Name = \'" & _UserName & "\'") If dr IsNot Nothing Then Dim Str1 As String = "授权用户: " & dr("Group") & " 当前登录用户: " & _UserName & " 日期:" & Date.Today & ", 星期" & "日一二三四五六".Chars(Today.DayOfWeek) StatusBar.Message2 = Str1 End If 但显示在foxtable主菜单的状态栏中,想让它显示在我设计的主窗口的状态栏中。 多次麻烦老师,每次老师都耐心解答,真的非常感谢!
|
-- 作者:有点甜 -- 发布时间:2018/3/18 20:56:00 -- 1、隐藏,参考
http://www.foxtable.com/webhelp/scr/3119.htm
http://www.foxtable.com/webhelp/scr/3220.htm
2、引用状态栏、赋值,也是参考
http://www.foxtable.com/webhelp/scr/3220.htm
|