- Foxtable(狐表) (http://foxtable.com/bbs/index.asp)
-- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2)
---- [求助]求隐藏代码 (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=84201)
-- 发布时间：2016/4/25 21:06:00
-- [求助]求隐藏代码
此主题相关图片如下：qq图片20160425210401.png
求上图隐藏不需要的按钮代码？
-- 发布时间：2016/4/25 21:13:00
--
自食其力
Dim frm = Windows.Forms.Form.ActiveForm
If frm IsNot Nothing Then
output.show(frm.name)
For Each c As object In frm.controls
output.show(c.name)
Next
End If
-- 发布时间：2016/4/25 21:43:00
--
其实现在最大的问题的，我不知道这些窗口叫什么名字和窗口里面的各个控件的名称
-- 发布时间：2016/4/25 22:26:00
--
在计划任务那里输入代码看啊。
-- 发布时间：2016/4/25 22:31:00
--
Dim frm = Windows.Forms.Form.ActiveForm
If frm IsNot Nothing Then
If frm.name = "Class183" Then
frm.controls("Button3").Visible = False
frm.controls("Button2").Visible = False
frm.controls("Button1").Visible = False
frm.controls("btnRename").Visible = False
frm.controls("btnAdd").Visible = False
frm.controls("btnDelete").Visible = False
End If
End If
-- 发布时间：2016/4/26 9:11:00
--
谢谢了
其实还想问一下，这些窗口和窗口里面的控件，它们的名称是怎样得出来的？
困惑中...
-- 发布时间：2016/4/26 9:49:00
--
看2楼，输入代码，然后打开对应的窗口可以看懂。
-- 发布时间：2016/4/26 10:59:00
--
此主题相关图片如下：1.png
是在计划管理里输入吧？
我试了很多，最后在计划管理里输入了，不过，只有打开命令窗口里才能看到控件名称（如上图）；
打开其它窗口，如：内部函数、代码编辑器等，就没有显示控件名称（如上图）
-- 发布时间：2016/4/26 11:00:00
--
显示在命令窗口那里的啊。
-- 发布时间：2016/4/26 13:12:00
--
现在基本明白，我再慢慢研究，谢谢了
