VB.NET中如何使用TreeView控件

這篇文章將為大家詳細講解有關VB.NET中如何使用TreeView控件，文章內容質量較高，因此小編分享給大家做個參考，希望大家閱讀完這篇文章后對相關知識有一定的了解。

一、準備知識

1、了解 TreeView控件的基本使用，掌握如何添加樹狀結構的數據到TreeView控件中。

2、了解 ImageList 控件的基本使用。

3、了解VB.NET System.IO 命名空間中的Directory 類的一些常用用法，下面我們先了解下本文要用到Directory類的成員GetDirectories：它用于獲取指定目錄中子目錄的名稱。如下代碼所示，獲取C：盤下的子目錄：

Dim dirs As String() = Directory.GetDirectories("c:\")

其結果是我們點開C盤后看到的文件夾，如果要獲取更深層次的文件夾列表，就要一個一個文件夾循環使用Directory.GetDirectories方法。

二、窗體布局

在窗體上拖放一個TreeView控件，一個Button 按鈕，一個ImageList 組件

然后把TreeView控件的ImageList 屬性設置為 ImageList1，注意，TreeView控件還有一個 SelectedImageIndex 屬性，它是用于獲取或設置當樹節點選定時所顯示的圖像的圖像列表索引值。我們注意到其實VB.NET使用TreeView控件的每一個Node(節點)都有一個屬于自己的 SelectedImageIndex 屬性值，所以我們可以像設置節點的 ImageIndex 屬性一樣在運行時單位為每一個Node設置 SelectedImageIndex 屬性。

三、編寫代碼

上面的準備工作和界面布置我們已經做好了，現在可以進行代碼編寫了。

首先，我們已經知道，要想獲得樹狀結構的每個層次中的子文件夾，我們必須使用遞歸過程來完成，下面所示代碼所執行的工作是：先把一個已經路徑的文件夾添加到樹狀結構中，然后再遍歷它的子文件夾：

'添加文件夾  
Public Sub AddDirectory(ByVal strFatherPath As String, 
ByVal strPath As String, ByVal nodeFather As TreeNode)  
Dim iDir As IO.Directory  
Dim iDirInfo As IO.DirectoryInfo  
Dim i As Integer  
Dim node As New TreeNode  
'先添加本目錄，從文件夾路徑分析出文件夾名稱  
node.Text = Strings.Replace(strPath, strFatherPath & "\", "", , 1)  
'為單個節點指定節點未被選中時顯示的圖標  
node.ImageIndex = 1 
'為單個節點指定節點被選中時顯示的圖標  
node.SelectedImageIndex = 2 
nodeFather.Nodes.Add(node)  
Application.DoEvents()  
Try  
Dim str() As String = iDir.GetDirectories(strPath)  
'遍歷該目錄的子文件夾  
For i = 0 To str.GetUpperBound(0)  
AddDirectory(strPath, str(i), node)  
Next  
Catch ex As Exception  
Debug.WriteLine(ex.Message  
End Try  
node = Nothing 
iDir = Nothing 
End Sub 

關于VB.NET中如何使用TreeView控件就分享到這里了，希望以上內容可以對大家有一定的幫助，可以學到更多知識。如果覺得文章不錯，可以把它分享出去讓更多的人看到。