explications pour Treeview

Question

bonjour &#224; tous, pour mon application g besoin du controle treeview mais le probl&#232;me c'est que je sait pas du tout comment on s'en faire et comment &#231;a marche... J'ai trouv&#233; des sources sur ce site mais j'y comprend toujours rien!!
J'aimerais que l'on m'explique :
- cr&#233;er un noeud p&#232;re et fils au d&#233;marrage de l'application (sans base de donn&#233;es ou autre) : les noeud ne changeront pas de nom.
- lorsqu'on clike sur un noeud fils je voudrais par exemple qu'il y est une msgbox qui s'affiche ou une form ou autre truc dans le genre...

merci

Gobillot · Answer

remplace TV par le nom de ton TreeView

    TV.Nodes.Add , , "Root1", "Root1"
    TV.Nodes.Add , , "Root2", "Root2"
    Set nod1 = TV.Nodes.Add("Root1", tvwChild, "Fils1-1", "Fils1-1")
    nod1.EnsureVisible
    Set nod1 = TV.Nodes.Add("Root1", tvwChild, "Fils1-2", "Fils1-2")
    nod1.EnsureVisible
    Set nod1 = TV.Nodes.Add("Root2", tvwChild, "Fils2-1", "Fils2-1")
    nod1.EnsureVisible
    Set nod1 = TV.Nodes.Add("Fils1-1", tvwChild, "Fils1-1-1", "Fils1-1-1")
    nod1.EnsureVisible
    Set nod1 = TV.Nodes.Add("Fils1-1", tvwChild, "Fils1-1-2", "Fils1-1-2")
    nod1.EnsureVisible

pour l'&#233;v&#234;nement sur un noeud:

Private Sub TV_NodeClick(ByVal Node As MSComctlLib.Node)
    MsgBox Node.Text
    AutreForme.Show
End Sub

Daniel

Gobillot · Answer

j'avais oubli&#233;:
Dim nod1   As Node

Daniel

cs_zeboss · Answer

merci !!! exactement ce que je cherch&#233;....

cs_zeboss · Answer

par contre pour l'ev&#232;nement ce que je voudrai &#231;a serait un &#233;v&#232;nement par "fils" ou "sous-fils"...

Gobillot · Answer

c'est toujours le m&#234;me &#233;v&#234;nement pour un noeud.
&#224; toi de le tester par son nom (Node.Text) ou sa cl&#233; (Node.key)

Daniel

Explications pour Treeview

5 réponses

Discussions similaires