- Foxtable(狐表) (http://foxtable.com/bbs/index.asp)
-- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2)
---- 关于treeview (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=62083)
-- 发布时间：2014/12/25 9:48:00
-- 关于treeview
如图
此主题相关图片如下：复选框.png
如何编程，能使得选择一级节点复选框后，二级复选框全部也选上了。同样取消复选框二级也全部取消呢？
-- 发布时间：2014/12/25 9:54:00
--
上个例子
-- 发布时间：2014/12/25 10:08:00
--
AfterCheckNode事件
Dim trv As WinForm.TreeView = e.Sender
Dim nd As WinForm.TreeNode
For Each nd In e.node.allNodes \'清除子节点的选中标记
nd.Checked = e.Node.Checked
Next
-- 发布时间：2014/12/25 10:47:00
--
谢谢甜老师，太厉害了
-- 发布时间：2014/12/25 12:45:00
--
选择一个二级节点，如果其所在的一级节点没选上，如何让它自动选上呢？
-- 发布时间：2014/12/25 14:13:00
--
Dim trv As WinForm.TreeView = e.Sender
Dim nd As WinForm.TreeNode
For Each nd In e.node.allNodes \'清除子节点的选中标记
nd.Checked = e.Node.Checked
Next
If e.Node.Level = 1 Then
Dim flag As Boolean = False
For Each nd In e.Node.ParentNode.Nodes
If nd.Checked = True Then
flag = True
End If
Next
e.node.ParentNode.Checked = flag
End If