WITH ThisForm.oleTreeView ** This adds a parent node oRootNode = ThisForm.oleTreeView.Nodes.Add(,, "RootKey", "This is the 1st node") ** This adds 10 nodes to the parent FOR x = 1 TO 10 cMyKey = "X" + + TRANSFORM(x) cCaption = "This is the node " + TRANSFORM(x) oChildKey = .Nodes.Add(oRootNode, 4, cMyKey, cCaption) ENDFOR ** This adds a child node to node 5 cMyKey = "X" + SUBSTR(SYS(2015), 2) oParentNode = .Nodes(5) oRootNode = .Nodes.Add(oParentNode, 4, cMyKey, "Child of node 5") ENDWITH