treeview 控件,怎么展开整个树,在线等待

Question

treeview 控件,怎么展开整个树,合拢整个树哪?我知道如果展开树的某一节点用   treeview1.Nodes(index).Expanded = True ,那么展开整个树这样就显麻烦了,我想应该有简单的方法.

Answer 1

Dim n As Node'全部展开
For Each n In TreeView1.Nodes
n.Expanded = True
Next'全部合拢
For Each n In TreeView1.Nodes
n.Expanded = False
Next

Answer 2

for each 遍历是先序遍历还是什么?我想分别显示选中节点及该节点父节点、父节点……一直到根结点

Answer 3

for each 就是以你那个index为序
用你选中的那个node不断调用.Parent就能分别显示选中节点及该节点父节点、父节点……一直到根结点

Answer 4

对for each 不熟，能不能写出代码？