以文本方式查看主题 - Foxtable(狐表) (http://foxtable.com/bbs/index.asp) -- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2) ---- 如何给不同层级的树节点设置颜色 (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=90185) |
-- 作者:包头123 -- 发布时间:2016/9/7 11:33:00 -- 如何给不同层级的树节点设置颜色 版主: 如何给不同层级的树节点设置颜色?下述语句设置哪里有问题? Dim Trv As WinForm.TreeView = e.Form.Controls("TreeView1") For Each nd As WinForm.TreeNode In trv.AllNodes If nd.Nodes.Count = 0 Then ’0层级颜色 nd.ForeColor = Color.Red End If If nd.Nodes.Count = 1 Then ’1层级颜色 nd.ForeColor = Color.Blue End If If nd.Nodes.Count = 2 Then ’2层级颜色 nd.ForeColor = Color.Blue End If Next |
-- 作者:有点蓝 -- 发布时间:2016/9/7 12:04:00 -- Dim Trv As WinForm.TreeView = e.Form.Controls("TreeView1") For Each nd As WinForm.TreeNode In trv.AllNodes If nd.Level = 0 Then \'0层级颜色 nd.ForeColor = Color.Red End If If nd.Level = 1 Then \'1层级颜色 nd.ForeColor = Color.Blue End If If nd.Level = 2 Then \'2层级颜色 nd.ForeColor = Color.Blue End If Next
|
-- 作者:包头123 -- 发布时间:2016/9/7 14:01:00 -- 谢谢了。 |