- Код: Выделить всё
Dim nodODE As Node
TreeView.Nodes.Clear
Set nodODE = TreeView.Nodes.Add(, , "Machine", "Machine")
Set nodODE = TreeView.Nodes.Add(1, tvwChild, "MachineProperty", "Property")
For I = 1 To Mac.PositionsNumber
Set nodODE = TreeView.Nodes.Add(2, tvwChild, Element_TreeView(I).Name_Parent, Element_TreeView(I).Name)
Next
Можно как-нибудь вносить ноды по имени ихнего предка?
Т.е. если в дереве есть елемент с именем "ddd", можно внести елемент "kkk", как child именно в "ddd" ?