Treeview's & Listview's

[thorpen]

Please help!

I haven't used Treeview or listview before - can anyone point me in the right direction ?

I want the user to be able to navigate through the directory structure and then get a list of files - make sense ?

Thanks,

Nick.

[christophe]

Here's a bit of code you can analyse and use for the treeview control.

Private Sub Form_Load()
Dim ndsnode As Node
' Here you're making the first Main Nodes
Set ndsnode = TreeView.Nodes.Add(, , "MAIN1", "Introduction")
Set ndsnode = TreeView.Nodes.Add(, , "MAIN2", "Algebra")

' Here you make child nodes under Main2 Node
Set ndsnode = TreeView.Nodes.Add("MAIN2", tvwChild, "2CHILD4", "Evaluating")
Set ndsnode = TreeView.Nodes.Add("MAIN2", tvwChild, "2CHILD5", "Simplifying")
Set ndsnode = TreeView.Nodes.Add("MAIN2", tvwChild, "2CHILD6", "Multiplying")
Set ndsnode = TreeView.Nodes.Add("MAIN2", tvwChild, "2CHILD7", "Dividing ")
Set ndsnode = TreeView.Nodes.Add("MAIN2", tvwChild, "2CHILD8", "Factorising")
Set ndsnode = TreeView.Nodes.Add("MAIN2", tvwChild, "2CHILD9", "Solving")
Set ndsnode = TreeView.Nodes.Add("MAIN2", tvwChild, "2CHILD10", "Expressing")
Set ndsnode = TreeView.Nodes.Add("MAIN2", tvwChild, "2CHILD11", "Inequalities")
Set ndsnode = TreeView.Nodes.Add("MAIN2", tvwChild, "2CHILD12", "Algebraic fractions")


Set ndsnode = TreeView.Nodes.Add("2CHILD9", tvwChild, "CHILD9a", "Simple equations")
Set ndsnode = TreeView.Nodes.Add("2CHILD9", tvwChild, "CHILD9b", "Quadratic equations")
Set ndsnode = TreeView.Nodes.Add("2CHILD9", tvwChild, "CHILD9c", "Simultaneous equations")
ndsnode.Selected = True
End Sub