Foxtable(狐表)用户栏目专家坐堂 → 遍历窗口中的控件eanble的问题


  共有2010人关注过本帖树形打印复制链接

主题:遍历窗口中的控件eanble的问题

帅哥哟,离线,有人找我吗?
sjzsdu
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:小狐 帖子:341 积分:2455 威望:0 精华:0 注册:2014/7/30 18:03:00
遍历窗口中的控件eanble的问题  发帖心情 Post By:2016/2/19 15:03:00 [只看该作者]

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
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:九尾狐 帖子:2928 积分:20178 威望:0 精华:0 注册:2012/2/3 17:45:00
  发帖心情 Post By:2016/2/19 15:18:00 [只看该作者]

我觉得 插入分区面板SplitContainer1,然后在分区面板中加入面板Panel1 Panel2
面板1放入您的退出按钮
面板2放入您的tabcontrol控件

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

 回到顶部
帅哥哟,离线,有人找我吗?
大红袍
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:贵宾 帖子:39310 积分:196782 威望:0 精华:1 注册:2015/4/25 9:23:00
  发帖心情 Post By:2016/2/20 0:52:00 [只看该作者]

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

 

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

 

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


 回到顶部