Bonjour ,

je souhaite creer de façon automatique (avec un algorithme performant)
un treeview avec 2 enfants et 3 niveaux de profondeurs.
Ici j'arrive seulment à creer avec cet algo les 2 enfants.
Aussi apres avoir reussi cela ça devrai me permettre
de pouvoir paramettrer le nombre d'enfants et le niveau de profondeur.

voici un bout de mon code , Merci pour vos aides et avis

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
'procedure en cours de validation pour une construction dynamique
Private Sub cmdactualiser_Click()
'Dim x,p As Variant
Dim s As String
Dim cpt1, cpt2, x, p As Integer
Dim enf, prof As Integer
    TreeView1.Nodes.Add , , "main", "1" 'noeud principale
    '15 noeuds, 2 enfants, profondeur 3
enf = 2
prof = 3
    x = 2
    p = x
    s = CStr(x)
    For cpt1 = 1 To enf
        TreeView1.Nodes.Add "main", tvwChild, p & "a", s 'noeud fils du noeud principal
 
        p = p + 1
        s = CInt(s)
        s = x + 1
        s = CStr(s)
        Next cpt1
end sub