Icons aan treeview toevoegen m/v

[weswillem]

Ik wil icons toevoegen de treeview.
wanneer de node een M betreft dan icon1
anders icon2 (v)
Het enige wat ik wil dat de namen voorzien worden van een icoontje
en niet de categorie waar ze onder staan

iemand enig idee?

TreeView1.Nodes(0).Nodes.Add(New TreeNode("Clienten"))
        For i = 0 To iAantal - 1 Step 1
            WerkId = ds.Tables("Zorgboerderij").Rows(i).Item(1)
            If WerkId = 4 Then
                Naam = ds.Tables("Zorgboerderij").Rows(i).Item(2) & ds.Tables("Zorgboerderij").Rows(i).Item(3)
                Dim TN As New TreeNode
                If ds.Tables("Zorgboerderij").Rows(i).Item(4) = "M" Then
                    TN.ImageIndex = 2
                Else
                    TN.ImageIndex = 1
                End If
                TN.Text = Naam
                TN.Tag = ds.Tables("Zorgboerderij").Rows(i).Item(0)
                TreeView1.Nodes(0).Nodes(3).Nodes.Add(TN)
            End If
        Next

 

[JoZ1]

Kan redelijk eenvoudig met een ImageList.

http://msdn.microsoft.com/en-us/library/haf2a2zb(v=vs.90).aspx

 

[weswillem]

Dat klopt. Alleen de hoofditems moeten daarvan niet zijn voorzien

 

[JoZ1]

Wat probeer je precies te maken?
Ik denk dat je zoiets of zoiets nodig gaat hebben.

 

[weswillem]

Overzicht
Personen geen icon
Contacten geen icon
Naam wel icon
Cliënten

Zoiets!

 

[JoZ1]

Zal best, maar heb je überhaupt gekeken naar mijn links?

 

[weswillem]

Natuurlijk, heb ik gekeken. Maar wilde even laten zien. Ga aan de slag met de links.

 

[JoZ1]

Alright, succes. Als je hulp nodig hebt, hoor ik het wel.