Hallo Alex,
ein Beispiel:
Private Sub Form_Load()
With TreeView1.Nodes
.Add , 0, "Key1", "Eltern"
.Add "Key1", 4, , "Kind1"
.Add "Key1", 4, "Key2", "Kind2"
.Add "Key2", 4, , "Enkel1"
.Add "Key2", 4, "Key3", "Enkel2"
.Add "Key3", 4, , "Urenkel1"
.Item(2).EnsureVisible
End With
End Sub
------------------
Gruß
Nepumuk
Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP