如何填充在同一個表父子關係樹視圖

Question

數據庫結構是：

Id Name  ParentId 
1  File  NULL 
2  Open  1 
3  Save  1 
4  Exit  1 
5  Edit  NULL 
6  Cut  5 
7  Copy  5 

我想顯示使用VB.Net喜歡在樹視圖上面的數據：

File 
----- Open 
----- Save 
----- Exit 
Edit 
----- Cut 
----- Copy 

我正在使用數據庫PostgreSQL。

Answer 1

Sub AddTreeItems(id as Integer, node as TreeNode) 
    dim s = id.ToString 
    If id = 0 Then 
     s = "NULL" 
    End If 
    r as new Query("select * from table where parent =" & s) 
    While r.read() 
     dim n as new TreeNode(r["name"]) 
     node.Add(n) 
     AddTreeItems(r["id"],n) 
    End While 
End Sub 

該查詢函數是有點僞代碼，但我認爲你得到的圖片。