Dim myNode As TreeNode
Dim mynode2 As TreeNode
myNode = TreeView1.Nodes.Add("Campbells")
myNode = myNode.Nodes.Add("HR")
myNode = myNode.Nodes.Add("arbeiders")
myNode = myNode.Nodes.Add("Vera")
myNode = TreeView1.Nodes.Add("Capsugel")
mynode2 = myNode.Nodes.Add("IS")
mynode2 = mynode2.Nodes.Add("MIS")
mynode2.Nodes.Add("Marc")
mynode2.Nodes.Add("Pieter")
mynode2 = mynode2.Parent.Nodes.Add("IT")
mynode2.Nodes.Add("Bart")
mynode2 = myNode.Nodes.Add("Prod")
mynode2 = mynode2.Nodes.Add("ploeg A")
mynode2.Nodes.Add("Frank")