以文本方式查看主题 - Foxtable(狐表) (http://foxtable.net/bbs/index.asp) -- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2) ---- 请教 (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=75696) |
-- 作者:hbhb -- 发布时间:2015/10/13 10:10:00 -- 请教 大师:请问分区面板的分割线能否单独用代码设置颜色? |
-- 作者:大红袍 -- 发布时间:2015/10/13 10:16:00 -- 设置背景颜色,就是边框的颜色。 |
-- 作者:hbhb -- 发布时间:2015/10/13 12:44:00 -- 谢谢! 这个意思,当遍列窗口中的控件统一设置背景颜色时,分区面板的分割线就看不到了,有无办法单独设置颜色?能够区分不同分区?
|
-- 作者:大红袍 -- 发布时间:2015/10/13 14:24:00 -- 分区1、分区2、控件,必须要分别设置。
判断,如果控件是某类型,就分别设置 For Each c As WinForm.Control In e.Form.Controls If Typeof c Is WinForm.TextBox Then \'判断控件是否是文本框 Dim t As WinForm.TextBox = c \'使用特定类型的变量引用控件 t.Value = Nothing End If Next
|
-- 作者:hbhb -- 发布时间:2015/10/13 15:36:00 -- For Each c As Winform.Control In Forms("frmGg1").Controls Forms("frmGg1").BackColor = Color.LightBLue c.Forecolor = Color.blue If Typeof c Is WinForm.SplitContainer Then Dim t As WinForm.SplitContainer = c t.Panel1.BackColor = Color.LightBLue t.Panel2.BackColor = Color.LightBLue End If Next 请问为何分区面板分割线的原来红色不能显示出来?
|
-- 作者:大红袍 -- 发布时间:2015/10/13 15:41:00 -- t.backColor = Color.Red |
-- 作者:hbhb -- 发布时间:2015/10/13 15:51:00 -- 无效呀 |
-- 作者:大红袍 -- 发布时间:2015/10/13 15:54:00 -- 汗,不可能无效啊。
For Each c As Winform.Control In e.form.Controls |