Добавить SubItems в TreeView

Question

Я уверен, что это звучит как вопрос n00b, но как я могу добавить вспомогательные элементы программным образом при заполнении списка TreeView в VB.NET 3.5? У меня есть следующий код, но не смогли выяснить, как добавить в подпункты для каждой из папок/файлов Я заселяющих TreeView с:

Private Sub AddToList(ByVal targetDirectory As String, ByVal boolFiles As Boolean, Optional ByVal recur As Boolean = False) 

    Dim shortName As String 

    TreeView1.Items.Add(targetDirectory) 

    //Add subitems under here 

    If Directory.GetDirectories(targetDirectory).Length > 0 Then 
     Dim subdirectoryEntries As String() = Directory.GetDirectories(targetDirectory) 
     Dim subdirectory As String 

     For Each subdirectory In subdirectoryEntries 
      shortName = subdirectory.Remove(0, subdirectory.LastIndexOf("\") + 1) 
      TreeView1.Items.Add(shortName) 
      AddToList(subdirectory, False, True) 

      If boolFiles = True Then AddToList(subdirectory, boolFiles) 
     Next 
    End If 
End Sub 

Чтобы уточнить, я хочу, чтобы мой TreeView чтобы выглядеть похожим на вид Windows Explorer. Я ценю любую помощь!

Заранее благодарен! JFV

Answer 1

Вам нужно использовать объекты TreeNode и добавить дочерние элементы в родительский TreeNode, а не добавлять все в TreeView напрямую. Выезд this example.

Answer 2

Какой TreeView это? В winforms вы просто поймаете возвращаемый TreeNode из Add и добавьте больше объектов в свойство Nodes:

TreeNode parent = treeView.Nodes.Add("parent"); 
parent.Nodes.Add("child");