مشلة فى الترييى فيوو Tree View

		TreeView1.Nodes.Add("Roote", "MyArchive")

		TreeView1.Nodes("Roote").Nodes.Add("Parent1", "Parent1")
		TreeView1.Nodes("Roote").Nodes.Add("Parent2", "Parent2")

		TreeView1.Nodes("Roote").Nodes("Parent1").Nodes.Add("ch1", "ch1")
		TreeView1.Nodes("Roote").Nodes("Parent1").Nodes.Add("ch2", "ch2")

		TreeView1.Nodes("Roote").Nodes("Parent2").Nodes.Add("ch3", "ch3")
		TreeView1.Nodes("Roote").Nodes("Parent2").Nodes.Add("ch4", "ch4")

مشكوور حسن

بس ده مستحييل

أفرض انى عندى 22 مستوى هعمل

Tree.Nodes(1).Nodes(2).Nodes(3).Node(4).Nodes(5)......Nodes(11).Add ("asd")

أصل الترى دى المستخدم هو الهيعملها و معرفشى هتكون كام مستوى

اخي الحبيب إن كانت المعلومات لديك من قاعدة بيانات تعامل مع الحدث beforeexpand حيث يمكنك وضع ماتشاء من الفروع

What is Relation Between BeforeExpand And My Own Sub FillTree From DB

i Can Fill Any Number OF Level and Node Using

Dim mNode As New TreeNode
		Dim mEnterName As String

		mEnterName = InputBox("Enter Folder Name", "New Folder", "")

		If mEnterName = "" Then Exit Sub

		mNode = TreeView1.SelectedNode

		mNode.Nodes.Insert(TreeView1.SelectedNode.Index, X & "I", mEnterName, 0, 1)

X =X +1

But Node Must Be selected

And i Need Create Tree Structure From dataBase That Has Level Number and Node Name (Key)

السلام عليكــم ورحمـة الله وبركاتــه ،،

هذا الكود يستخدم أسلوب البرمجة الارتدادية (لا أنصحك به :P ) لملأ الشجرة بالمجلدات الموجودة على المشغل C

Public Class Form1

	Private Sub FillTreeNode(ByVal node As TreeNode)
		Dim nd As TreeNode
		For Each dir As String In My.Computer.FileSystem.GetDirectories(node.FullPath)
			nd = New TreeNode
			nd.Text = New IO.DirectoryInfo(dir).Name
			node.Nodes.Add(nd)
			FillTreeNode(nd)
		Next
	End Sub

	Private Sub btnFillFromC_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnFillFromC.Click
		Dim node As TreeNode
		Me.TreeView1.Nodes.Clear()
		Me.TreeView1.Nodes.Add("C:\")
		For Each dir As String In My.Computer.FileSystem.GetDirectories("C:\")
			node = New TreeNode
			node.Text = New IO.DirectoryInfo(dir).Name
			Me.TreeView1.Nodes(0).Nodes.Add(node)
			FillTreeNode(node)
		Next
		MsgBox("Done", MsgBoxStyle.Information)
	End Sub
End Class

لكن كما قال الأخ أبو عزام يمكنك فى حدث BeforeExpand ملأ الفروع وهذا الأسلوب أسرع بكثير من أسلوب البرمجة الارتدادية

Thx Ghost

I Found It

Dim mNode as new TreeNode
mNode  = TreeView1.Nodes.Find(Key,SearchOnAllChiled)
mNode.Add ("123")