在VB.NET中如何对treeview进行遍历？

[godslayer]

对一条路径进行遍历到叶子结点，对其中每个结点都可以有一个相同的操作，也就是边遍历边操作
然后再进行下一条路径，一直到最后
这个遍历怎么实现？谢谢
求高手给个VB.NET的代码，谢谢

[copico]

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim item As TreeNode = TreeView1.Nodes(0)
Dim it As TreeNode

Trivalchild(item)

TrivalBrother(item)
End Sub

Sub Trivalchild(ByVal e As TreeNode)
MsgBox(e.Text)
Dim item As TreeNode = e.NextNode
Trivalchild(item)
TrivalBrother(item)

End Sub

Sub TrivalBrother(ByVal e As TreeNode)
MsgBox(e.Text)
Dim item As TreeNode = e.NextNode
Trivalchild(item)
TrivalBrother(item)
End Sub

[godslayer]

晕，sauce兄不在这儿，我怎么给分啊，又不能给自己加分
这贴没法儿结了

[godslayer]

您写的很好，可是我运行的时候有点儿问题，可以帮我解决一下吗？
最好再解释一下程序，是递归调用，一条线一条线的来是吧，不错
问题是我运行的时候还是有问题，麻烦您上机再帮我试一下，谢谢

[godslayer]

那个it是什么意思？也没用上啊
麻烦您解释一下，谢谢

[godslayer]

您的nextnode是不对的，这个得到的是同一级的兄弟姐妹树，而不是其子树
麻烦高人指导啊

[copico]

我试试,==

[godslayer]

晕，这个问题我自己解决了，谢谢sauce兄，看了他以前的回复我才知道在VB.NET中该如何实现
感觉VB.NET是改的更好了，特别是TREEVIEW，虽然少了一些属性但是用起来更方便，真强
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
traverse(TreeView1.Nodes)
End Sub

Sub traverse(ByVal a As TreeNodeCollection)
Dim nd As TreeNode
For Each nd In a
MsgBox(nd.Text)
traverse(nd.Nodes)
Next
End Sub

[wangchaocn]

mark

[sunsatan]

通过递归调用一般采用深度优先或者广度优先都可以