VB.NET如何在treeview中將子節點添加到特定節點

Question

如何在treeview中將子節點添加到特定節點？ 假設我已經在樹視圖中有“Item1”，如何將“SubItem1”添加到“Item1”作為其子節點？

我知道它可能非常簡單，但我嘗試了很多東西，我只是不能讓它工作。

Answer 1

將子節點添加到父節點（未選中）

首先使用Find()獲取對父節點的引用。 然后使用與下面其他部分相同的技術添加它。

Dim MyNode() As TreeNode 
MyNode = TreeView1.Nodes.Find("Item1", True)
MyNode(0).Nodes.Add("SubItem1")

以編程方式添加節點

如果要將子節點添加到特定父節點，則可以使用parent.node.add()方法將子節點添加到其父節點。 您可以創建任意數量的這樣的孩子。

例如，如果您想要一個類似的場景：

祖父 - >父親 - >兒子

然后你可以這樣做：

dim GrandfatherNOde as treenode = tree.nodes.add("Grandfather")
dim fatherNode as treenode = GrandfatherNode.Nodes.add("Father")
dim sonNode as treenode = fatherNode.Nodes.add("Son")

更多閱讀/例子

此頁面有一個很好的示例，您可以運行以動態地將子節點添加到樹中。 他們在一個按鈕上做到了，他們像這樣連接起來：

Private Sub AddChild_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles AddChild.Click
    TView.SelectedNode.Nodes.Add(Text1.Text)
End Sub

http://www.codeproject.com/Articles/11830/The-Basic-Operations-on-using-the-TreeView-Control

Answer 2

我來到這里時，我一直在找同樣的東西，到目前為止，我無法達到我需要的水平。

所以我到了這個頁面： http ： //www.dotnetspider.com/forum/168335-How-add-node-treeview-VB.NET.aspx

看看后真的很酷，很簡單。

事實證明，我們只需要輸入nodes.add（“nodename”）來繼續添加子級別。 Treeview1.Nodes.Add（ “Root_1”）。Nodes.Add（ “Child_Level_1”）。Nodes.Add（ “Child_Level_2”）

Treeview1.Nodes.Add("Root_1").Nodes.Add("Child_Level_1").Nodes.Add("Child_Level_2")

這將是這樣的：

http://img716.imageshack.us/img716/7254/semttulonzk.jpg

希望它有所幫助; D.

Answer 3

如果確保為TreeNode分配Name可以使用“ Find找到它並添加“ Child節點。

例：

Public Class Form1
    Dim Nodes(5) As TreeNode


    Public Sub New()

        ' This call is required by the designer.
        InitializeComponent()

        ' Add any initialization after the InitializeComponent() call.

        Nodes(0) = New TreeNode("Root")
        Nodes(0).Name = "Root"
        Nodes(1) = New TreeNode("Item1")
        Nodes(1).Name = "Item1"
        Nodes(2) = New TreeNode("Item2")
        Nodes(2).Name = "Item2"
        Nodes(3) = New TreeNode("Item3")
        Nodes(3).Name = "Item3"
        Nodes(4) = New TreeNode("Item4")
        Nodes(4).Name = "Item4"
        Nodes(0).Nodes.Add(Nodes(1))
        Nodes(0).Nodes.Add(Nodes(2))
        Nodes(0).Nodes.Add(Nodes(3))
        Nodes(0).Nodes.Add(Nodes(4))

    End Sub

    Private Sub Button1_Click(sender As System.Object, e As System.EventArgs) Handles Button1.Click
        TreeView1.Nodes.Add(Nodes(0))
    End Sub

    Private Sub Button2_Click(sender As System.Object, e As System.EventArgs) Handles Button2.Click
        Dim tmpNode() As TreeNode = TreeView1.Nodes.Find("Item1", True)
        'Assuming only one Match
        tmpNode(0).Nodes.Add("Child Of Item1")
    End Sub
End Class

Answer 4

*假設空TreeView：

Dim rootNode = TreeView1.Nodes.Add("Root")

rootNode.Nodes.Add("SubNode")