- Foxtable(狐表) (http://foxtable.com/bbs/index.asp)
-- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2)
---- 【左上角规避显示菜单后会有两个竖杠】 (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=99559)
-- 发布时间：2017/4/21 13:09:00
-- 【左上角规避显示菜单后会有两个竖杠】
If User.Type <> UserTypeEnum.Developer
TableCaptionVisible = False
End If
For Each t As RibbonMenu.Tab In RibbonTabs
t.Visible =False
Next
BaseMainform.Controls("C1StatusBar1").Visible = False
MainTable = Tables("网站信息表")
ApplicationMenu.visible =False
ApplicationMenu.DropdownWidth = -1
Forms("WEBSERVER").open()
此主题相关图片如下：无标题.png
[此贴子已经被作者于2017/4/21 13:11:27编辑过]
-- 发布时间：2017/4/21 14:10:00
--
加上代码
QAT.visible = False