Simpelt spørgsmål til TreeView

Læg en treeview-kontrol ("treeview1") på en form ("form1"). Læg flg. kode på form1:

Private Sub Form_Load()

    Dim nd As Node

    TreeView1.Nodes.Add , , "root", "Transportmidler"
   
    TreeView1.Nodes.Add "root", tvwChild, "X1", "Bil"
    TreeView1.Nodes.Add "X1", tvwChild, "X2", "Gear"
    TreeView1.Nodes.Add "X1", tvwChild, "X3", "Hjul"
    TreeView1.Nodes.Add "root", tvwChild, "X4", "Hest"
    TreeView1.Nodes.Add "X4", tvwChild, "X5", "Hoved"
    TreeView1.Nodes.Add "X4", tvwChild, "X6", "Hale"
    TreeView1.Nodes.Add "X4", tvwChild, "X7", "Tænder"
   
    For Each nd In TreeView1.Nodes
        nd.Expanded = True
    Next

End Sub

Private Sub TreeView1_NodeClick(ByVal Node As MSComctlLib.Node)

    MsgBox Node.Text

End Sub


It's that easy... ;-)

Og lidt mere udførligt:
Treeview'et er i virkeligheden en "samling" af elementer (nodes) der har en eller anden form for relation til hinanden.
Derfor angives følgende parametre når man indsætter en ny node:

1) Relation: Et element som dette element har en eller anden form for forbindelse til.

2) Relationens art: Her benyttes tvwChild som angiver at dette element er et "barn" af elementet angivet i parameter 1.

3. Elementets idenfikationsnøgle (NB: Det kan IKKE være et tal alene, derfor X'et.
4. Den tekst der skal stå i træet.

Der er flere parametre, men de skal ikke nødvendigvis angives og er ikke vigtige for din opgave (AFAIK).

Mange tak for hjælpen ! Very nice very nice :)