VB.Net樹視圖（TreeView）

樹視圖(TreeView)控件用於顯示與Windows資源管理器左窗格中文件和文件夾的顯示方式類似的專案分層表示。每個節點可能包含一個或多個子節點。參見如下控件視圖 -

從工具箱中點擊一個TreeView控件，並把它放在窗體上。

TreeView控件的屬性

以下是TreeView控件的一些常用屬性：

TreeView控件的方法

以下是TreeView控件的一些常用方法：

TreeView控件的事件

以下是TreeView控件的一些常用事件：

TreeNode類

TreeNode類表示TreeView的一個節點。 TreeView控件中的每個節點都是TreeNode類的一個對象。為了能夠使用TreeView控件，需要查看TreeNode類的一些常用屬性和方法。

TreeNode類的屬性

以下是TreeNode類的一些常用屬性：

TreeNode類的方法

以下是TreeNode類的一些常用方法：

示例

在這個例子中，在運行時創建一個樹形視圖。雙擊窗體並將下麵的代碼放在打開的窗口中。

Public Class Form1
    Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
        ' create a new TreeView '
        ' Dim TreeView1 As TreeView '
        ' TreeView1 = New TreeView() '
        TreeView1.Location = New Point(10, 10)
        TreeView1.Size = New Size(180, 250)
        Me.Controls.Add(TreeView1)
        TreeView1.Nodes.Clear()
        'Creating the root node '
        Dim root = New TreeNode("Application")
        TreeView1.Nodes.Add(root)
        TreeView1.Nodes(0).Nodes.Add(New TreeNode("Project 1"))
        'Creating child nodes under the first child
        For loopindex As Integer = 1 To 4
            TreeView1.Nodes(0).Nodes(0).Nodes.Add(New _
                TreeNode("Sub Project" & Str(loopindex)))
        Next loopindex
        ' creating child nodes under the root '
        TreeView1.Nodes(0).Nodes.Add(New TreeNode("Project 6"))
        'creating child nodes under the created child node
        For loopindex As Integer = 1 To 3
            TreeView1.Nodes(0).Nodes(1).Nodes.Add(New _
                TreeNode("Project File" & Str(loopindex)))
        Next loopindex
        ' Set the caption bar text of the form.  '
        Me.Text = "xuhuhu.com"
    End Sub

    Private Sub TreeView1_AfterSelect(sender As Object, e As TreeViewEventArgs) Handles TreeView1.AfterSelect

    End Sub
End Class

當上面的代碼執行並使用Microsoft Visual Studio工具欄上的“開始”按鈕運行時，它將顯示以下窗口：

可以展開節點來查看每個子節點，如下圖所示：