Lorsque tu crées un noeud, tu lui affectes un nom (ici "La racine"
Set nodx = Tvw.Nodes.Add(, , "n", "La racine")
Set nodx = Tvw.Nodes.Add("n", tvwChild, "n1", "Noeud 1")
Set nodx = Tvw.Nodes.Add("n", tvwChild, "n2", "Noeud 2")
If monNoeud.Text="La racine" Then
MsgBox "Il s'agit de la racine"
End If
ou bien
If monNoeud="n" Then
MsgBox "Il s'agit de la racine"
End If
Manu
|