Подскажите, а как переработать класс TreeView таким образом, чтобы в каждом ноде вместо обычного значения текст, была привязана структура, например такая:

Public Structure TElement
   Dim Text as String
   Dim Value as Decimal
   Dim ID as Decimal
End Structure

И при добавлении узла ему можно было присвоить все выше перечисленные значения, например:

Dim nd as MyTreeViewNode()
With nd.MyData
   .Text = "Строка"
   .Value = 777
   .ID = 17
End With

TreeControl.Nodes.Add(nd)

где MyData та самая структура ...

Понимаю, что вопрос тупой, но по моему я вообще не в ту область полез. А по теории вроде понятно:

Надо переработать и дополнить только класс TreeViewNode, ведь так ?