Hallo leute
Ich möchte eine TreeView mit Ordnern füllen.
Hab dazu einen Testordner erstellt.
Leider funktioniert es nicht ganz so wie ich es mir vorstelle:
Aufrufen tu ich so:
Hoffe ihr findet den Fehler
Ich möchte eine TreeView mit Ordnern füllen.
Hab dazu einen Testordner erstellt.
Leider funktioniert es nicht ganz so wie ich es mir vorstelle:
VB.NET-Quellcode
- Function GetFolders(ByVal Tn As TreeNode, ByVal DirInfo As DirectoryInfo) As TreeNode
- Dim SubTn As TreeNode
- Dim dinfos As DirectoryInfo() = DirInfo.GetDirectories()
- Threading.Thread.Sleep(1)
- If dinfos.Count = 0 Then
- Return Tn
- End If
- For Each Path As DirectoryInfo In dinfos
- SubTn = New TreeNode(Path.Name)
- SubTn.Tag = Path
- GetFolders(SubTn, Path)
- Next
- End Function
Aufrufen tu ich so:
Hoffe ihr findet den Fehler