Crawling A Treeview From A Selected Node

[bobbasic2002]

Hi,

Does anyone know how to crawl a treeview from selected node? The following code doesn’t work,

Dim tn As TreeNode

For Each tn In tv.SelectedNode.Nodes
MsgBox(tn.Text)
Next

It doesn’t give me the child nodes. Does anyone out there know how to do this?

Thank you,
Bob

[Edneeis]

The Nodes collection are the children or should be. You'd have to use a recursive function to get all levels though.

'I didn't test this code
 
'call it somewhere and pass the selectednode like this
ShowKids(tv.SelectedNode)
 
Public Sub ShowKids(ByVal Nodx As TreeNode)
   Dim tn As TreeNode
 
   For Each tn In Nodx.Nodes
      MsgBox(tn.Text)
      ShowKids(tn) 'here it calls itself to handle any children of this child (recursive)
   Next
End Sub

[bobbasic2002]

Works...Thanx