TreeRhythmen.ImageList = ImageList1
TreeRhythmen.Nodes.Clear()
TreeRhythmen.BeginUpdate()
for i = 1 to 10
   TreeRhythmen.Nodes.Add(CStr(i) + " Knoten").NodeFont = New _
     System.Drawing.Font("Arial", 8.25)
   TreeRhythmen.ImageIndex = 53 'Transparentes GIF
   TreeRhythmen.SelectedImageIndex = 53
   for x = 1 to 10
      'hier werden weitere Knoten mit Icons definiert
   next
next
TreeRhythmen.EndUpdate()