ник: kot_k_k
чет ты не так делаешь.
1.
зачем Set note=....?
если дерево заполняется вот так
Call Me.TreeView0.Nodes.Add(Ar(1), 4, .......)
2. переменная Note у тебя глобальная для данной функции - так вопрос чему она должна быть равна после твоего последнего
Set note = new_tree.Nodes.Add("R" & "РЕГИСТРЫ ПРОГРАММЫ", 4, "RP" & "РЕГИСТРЫ ПЕРЕМЕЩЕНИЙ", "РЕГИСТРЫ ПЕРЕМЕЩЕНИЙ", 3)
и глобальная ли она, может она сбрасывается на фиг?
3. Проверь с названием (см. пост выше) - т.к. твоя функция ничего не получает - нету у неее параметров