Объекты Node не реагируют на добавление child - VB

Формулировка задачи:

Пытаюсь создать дерево , но объекты Node не реагируют на добавление child. При debug''е node не показывают ничяго - nothing. В чем может быть проблема? Заранее спасибо!

Решение задачи: «Объекты Node не реагируют на добавление child»

textual
                            Листинг программы 
                        

                            Private Sub Form_Load()
   '' Установить параметры Treeview.
   TreeView1.LineStyle = tvwRootLines  '' Стиль 1
 
   '' Добавим ветку.
   Dim nodX As Node  '' Объявление переменной.
   '' Первая ветка будет с названием ''Root''.
   Set nodX = TreeView1.Nodes.Add(, , 'r', 'Root')
 
   '' Вторая ветка будет дочерней по отношению к ветке 1 ('Root').
   Set nodX = TreeView1.Nodes.Add('r', tvwChild, 'child1', 'Child')
 
End Sub
                        