2015-06-10 72 views
-1

我有下面的代碼,但似乎無法找到一個原因(也不是解決方案),爲什麼父節點不斷出現在列表的末尾作爲重複?不需要的treeview節點複製在列表的末尾

Imports System.IO 
Public Class Form1 

Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load 
    Dim di As New IO.DirectoryInfo("c:\la") 
    Dim diar1 As IO.FileInfo() = di.GetFiles() 
    Dim dra As IO.FileInfo 

    For Each dra In diar1 

     'Dim sr As StreamReader = New StreamReader(dra.FullName) 
     If System.IO.Path.GetExtension(dra.Name).ToLower() = ".xls" Then 
      TreeView1.Nodes.Add("Offerts") 
      TreeView1.Nodes(0).Nodes.Add(dra.Name) 
     End If 
    Next 

End Sub 
End Class 

+1

該代碼沒有任何意義,您需要描述您在樹完成後所期望的結果。 –

回答

0

在第一.xls文件找到,它會在樹的根的「Offerts」節點,然後在「Offerts」創建具有文件名的節點。

在後續.xls文件時,它創建另一個「Offerts」中的根節點,然後創建與所述第一節點的下文件名(已創建的第一個「Offerts」節點)的節點。

所以我認爲你想要做的只是在根上創建一次「offerts」節點,所以TreeView1.Nodes.Add("Offerts")不應該在每次找到.xls文件時運行。因此,更換該行的東西,如:

If TreeView1.Nodes.Count = 0 Then TreeView1.Nodes.Add("Offerts") 

會的工作,給出的情景。如果樹視圖已經有節點,那麼您必須修改該邏輯。

+0

謝謝託尼多數民衆贊成在現在:) –