[VB.Net] Pb avec les treeview, fan d'algo...

**bisounux** · 01/02/2006, 15h37

Bonjour à tous,

Je cherche à générer un treeview dynamiquement dans le code. Seulement j'ai un petit problème d'algorithme... Je fais une fonction récursive :

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
23
24
25
 
   Private Sub FaireMenu(ByVal IdParent As Integer, ByVal node As TreeNode)
 
        Dim MesTables As New Tables(NomBdd)
        Dim MaTable As DataTable = MesTables.LireTable(NomTable)
        Dim Macollection As New TreeNodeCollection
        For Each row As DataRow In MaTable.Rows
            If CInt(row("Id_Parent")) = IdParent Then
                Dim nodeEnfant As New TreeNode
                nodeEnfant.Text = row(1).ToString
                node.ChildNodes.Add(nodeEnfant)
                TreeView1.Nodes.Add(node)
                FaireMenu(CInt(row(0)), nodeEnfant)
            End If
        Next
 
 
 
    End Sub
 
    Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
        Dim node As New TreeNode("ola")
        FaireMenu(0, node)
 
    End Sub