TreeView/ Dim x as node x=treeview1.Nodes(...) do until x=Nothing x=x.Next loop - VB

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

Проблема такая: есть деревяшка - я хожу по ней через Next, Previous, Child, LastSibling и т.д. Но когда я делаю вот так

                    Листинг программы
                
Dim x as node
x=treeview1.Nodes(...)
do until x=Nothing
x=x.Next
loop

кричиит об ошибке - неправильное использование объекта. Я так понимаю из-за Nothing'а. Как мне реализавть такую фишку (см. прогу)?

Решение задачи: «TreeView/ Dim x as node x=treeview1.Nodes(...) do until x=Nothing x=x.Next loop»

textual
                            Листинг программы 
                        
Dim myNode As node
Dim i As Integer
 
TreeView1.Nodes.Add
TreeView1.Nodes.Add
 
For Each myNode In TreeView1.Nodes
   i = i + 1
 
Next myNode

Оцени полезность:

11 голосов , оценка 4.182 из 5

Нужна аналогичная работа?

Оформи быстрый заказ и узнай стоимость

Похожие ответы