چگونه یک TreeView رو پیمایش کنم؟

[mehrnoosh_al62]

سلام دوستان
در رابطه با این موضوع تو سایت سرچ کردم ولی چیزی پیدا نکردم که مشکلمو حل کنه.
من میخوام تو یه CheckBox TreeView با چندین سطح، پیمایش کنم و نود هایی که تیک خوردند FullPath اونها رو بدست بیارم. میشه برام یه نمونه کد بذارید...

[محسن بابائی]

سلام بر شما
یه زیربرنامه بازگشتی به این شکل می نویسی


Sub check(ByVal t As TreeNodeCollection)
For Each n As TreeNode In t
If n.Checked = True Then
MsgBox(n.FullPath)
End If

If n.Nodes.Count > 0 Then
check(n.Nodes)
End If
Next
End Sub

اینطوری هم صداش می زنی


check(TreeView1.Nodes)