以文本方式查看主题 - Foxtable(狐表) (http://foxtable.com/bbs/index.asp) -- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2) ---- 文件管理器隐藏目录按钮 (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=118802) |
-- 作者:deliangzhaoe -- 发布时间:2018/5/11 11:47:00 -- 文件管理器隐藏目录按钮 表中单元格设置打开文件管理器,想隐藏文件管理器中的目录按钮,增加“打印”按钮,该如何写? 现在在计划管理中设置了如下代码,隐藏了管理、增加、删除等按钮,目录的英文名称不是“addfolder”吗? Dim frm = windows.forms.form.activeform If frm IsNot Nothing Then If frm.Text = "文件管理器" Then Dim obj = frm.Controls("FileManager").Controls("SplitContainer1").panel2.Controls("FlowLayoutPanel1") If _usergroup = "管理员" Then obj.controls("Manager").visible = True obj.controls("add").visible = True obj.controls("delete").visible = True obj.controls("clear").visible = True Else obj.controls("Manager").visible = False obj.controls("add").visible = False obj.controls("delete").visible = False obj.controls("clear").visible = False End If End If End If 谢谢老师! |
-- 作者:有点甜 -- 发布时间:2018/5/11 12:16:00 -- 全部按钮
\'Folder |
-- 作者:deliangzhaoe -- 发布时间:2018/5/11 14:56:00 -- 好了, 谢谢了 |