Recursive TreeView Node Generator (VB 2005)

[Chris Topher]

Might anyone be able to assist me with writing a (hopefully) simple program to generate an "outline" of successively imbedded nodes, ideally for Visual Basic 2005? Although the recursive technique is the part I'm wrestling with (and thus could probably figure out the rest) the ideal input would be a global one dimensional array containing the number of nodes at each level (0=stop), for instance level[4]=3,2,1,0 would generate the following text/node tree (minus the leading dots, which merely denote indentation)

1.
...1.1
......1.1.1
...1.2
......1.1.2
2.
...2.1
......2.1.1
...2.2
......2.2.1
3.
...3.1
......3.1.1
...3.2
......3.2.1


As yet I haven't figured out how to add child nodes directly using VB 2005, but defining a variable as type "TreeNode" and then adding nodes successively works, but if anyone knows how to do this more directly, please let me know. (I've noticed there are additional 'overload' parameters allowed in the 'Add' command, but I haven't been able to make them work for this purpose.)

Dim rootNode, childNode as TreeNode
Dim rootName, childName as String

rootName="1"
childname="1.1"

rootNode=TreeView1.Nodes.Add(RootName)
childNode=rootNode.Nodes.Add(childName)

Finally, does anyone know how to set individual node text color in VB 2005?

Thanks much,
Chris

[DogsBollox]

1.
...1.1
......1.1.1
...1.2
......1.2.1
2.
...2.1
......2.1.1
...2.2
......2.2.1
3.
...3.1
......3.1.1
...3.2
......3.2.1

my quick solution returns the above..

 
Dim Levels As Int32 = 3
Dim c1 As Int32 = 1
Dim c2 As Int32 = 2
 
For loopy As Int32 = 1 To Levels
    Dim RootNode As New TreeNode
    RootNode = tv.Nodes.Add(loopy.ToString)
    RootNode.ForeColor = Color.Red
    For i2 As Int32 = 1 To c2
        Dim ChildNode2 As New TreeNode
        ChildNode2 = RootNode.Nodes.Add(loopy.ToString & "." & i2.ToString)
        ChildNode2.ForeColor = Color.Blue
 
        For i3 As Int32 = 1 To c1
            Dim ChildNode3 As New TreeNode
            ChildNode3 = ChildNode2.Nodes.Add(loopy.ToString & "." & i2.ToString & "." & i3.ToString)
           ChildNode3.ForeColor = Color.Green
        Next
    Next
Next
 
tv.ExpandAll()
 

-----------------------------------------------------------------------------

Might anyone be able to assist me with writing a (hopefully) simple program to generate an "outline" of successively imbedded nodes, ideally for Visual Basic 2005? Although the recursive technique is the part I'm wrestling with (and thus could probably figure out the rest) the ideal input would be a global one dimensional array containing the number of nodes at each level (0=stop), for instance level[4]=3,2,1,0 would generate the following text/node tree (minus the leading dots, which merely denote indentation)

1.
...1.1
......1.1.1
...1.2
......1.1.2
2.
...2.1
......2.1.1
...2.2
......2.2.1
3.
...3.1
......3.1.1
...3.2
......3.2.1


As yet I haven't figured out how to add child nodes directly using VB 2005, but defining a variable as type "TreeNode" and then adding nodes successively works, but if anyone knows how to do this more directly, please let me know. (I've noticed there are additional 'overload' parameters allowed in the 'Add' command, but I haven't been able to make them work for this purpose.)

Dim rootNode, childNode as TreeNode
Dim rootName, childName as String

rootName="1"
childname="1.1"

rootNode=TreeView1.Nodes.Add(RootName)
childNode=rootNode.Nodes.Add(childName)

Finally, does anyone know how to set individual node text color in VB 2005?

Thanks much,
Chris