以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  遍历窗口中的控件eanble的问题  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=81157)

--  作者:sjzsdu
--  发布时间:2016/2/19 15:03:00
--  遍历窗口中的控件eanble的问题
For Each con As WinForm.Control In e.Form.Controls
        con.Enabled = False
    
Next

Dim tbl As WinForm.Table = e.Form.Controls("Table1")
tbl.Enabled = True
tbl.ReadOnly = True

Dim tbc As WinForm.TabControl = e.Form.Controls("TabControl")
Dim tc As WinForm.Button = e.Form.Controls("退出")
tbc.Enabled =True
tc.Enabled =True

我想设置该窗口除了tabcontrol控件和退出按钮可以使用外,其他都不能使用。
上述代码实现结果全都是不能使用的,这有什么问题吗


--  作者:blsu33
--  发布时间:2016/2/19 15:18:00
--  
我觉得 插入分区面板SplitContainer1,然后在分区面板中加入面板Panel1 Panel2
面板1放入您的退出按钮
面板2放入您的tabcontrol控件

下面的命令实现了您的要求
e.Form.Controls("Panel1").Enabled=True
e.Form.Controls("Panel2").Enabled=False

--  作者:大红袍
--  发布时间:2016/2/20 0:52:00
--  

你的 TabControl 和 退出 按钮,应该放在某个容器里面你了吧?

 

如果它们的父容器不可用,那么里面的什么控件都不可用。

 

你要控制它们的父亲可用。