dotNETportal.cz

Private Sub Form1_Load(ByVal sender As Object, ByVal e As EventArgs) Handles Me.Load
  'Vytvořit kořenový uzel
  Dim rootNode As TreeNode = TreeView1.Nodes.Add("1", "1")
  'Vytvořit podřízený uzel
  Dim childNode As TreeNode = rootNode.Nodes.Add("10", "1.0")
  'Vytvořit podřízený uzel podřízeného uzle
  childNode.Nodes.Add("100", "1.0.0")
  'Odstranit podřízený uzel podřízeného uzle
  TreeView1.Nodes.RemoveByKey("100")
  'Načíst text kořenového uzle
  Dim rootNodeText As String = TreeView1.Nodes("1").Text
  'Změnit text podřízeného uzle
  TreeView1.Nodes("10").Text = TextBox1.Text
End Sub

Mimochodem v nápovědě (MSDN) je naprosto všechno včetně příkladů.