treeview的遍历

Question

有一个多层的treeview,我想从根结点开始，不分级的遍历整个treeview，（即从上往下依次遍历），请问各位大虾，有办法吗？next好像不行啊

Answer 1

Dim nodeY As Node
For Each nodeY In TreeView1.Nodes
    If CStr(Trim(nodeY.Text)) = "ff" Then
       nodeY.Selected = True
       TreeView1.SetFocus
       Exit For
    End If
Next

Answer 2

'循环查找"ff"节点
For i = 1 To TreeView1.Nodes.Count
    If CStr(Trim(TreeView1.Nodes(i).Text)) = "ff" Then
       TreeView1.Nodes(i).Selected = True
       TreeView1.SetFocus
       Exit For
    End If
Next'遍历查找"ff"节点
Dim nodeY As Node
For Each nodeY In TreeView1.Nodes
    If CStr(Trim(nodeY.Text)) = "ff" Then
       nodeY.Selected = True
       TreeView1.SetFocus
       Exit For
    End If
Next

Answer 3

Private Sub Command1_Click()
    Dim nodxx As Node
    For Each nodxx In Treeview1.Nodes
        MsgBox nodxx.Text
    Next
End Sub

Answer 4

不是查找，就不用条件判断就可以了。参见  lxcc(虫莲) 的例子.

Answer 5

lxcc(虫莲) ，你的例子我试过了，谢谢。但是还是分级遍历，要二级遍历好了再遍历三级，我是要
一次全部遍历完成，就是如果二级节点有子节点的话，那么就遍历子节点，以次类推，到子节点遍历好了以后再返回上级节点，继续遍历。请教我该怎么做阿？

Answer 6

add的时候添加index，然后按照index访问

Answer 7

你的问题只能用递归， strongfisher(Haiwolf)说的没错