Puebes guiarte poniendo un caracter en las claves... ejemplo si pones a las claves con numeros:
Si es la:
primera rama
100P
101P
102P
segunda rama
200S
201S
202S
Tercera rama
300T
301T
302T
Etc... Luego con:
TreeView1.SelectedItem.Key
Puedes obtener el ultimo caracter osea... ejemplo..
Dim xNodo as String
xNodo= Right(TreeView1.SelectedItem.Key, Len(TreeView1.SelectedItem.Key)-1)
Dependiendo en que nodo clickes xNodo sera:
xNodo=P 'Primer Nodo
xNodo=S 'Seundo Nodo
xNodo=T 'Tercer Nodo
.Add , , "Clave", "100P", 1
.Add "100P", tvwChild,200S,
.Add "100P", tvwChild, 201S,
.Add "100P", tvwChild, 202S,
.Add 202S, tvwChild, 300T,
.Add 202S, tvwChild, 301T,
.Add 202S, tvwChild, 302T,
ETC....
Espero que te ayude a idear....