Public Class Form1
 
   Private Sub TreeView1_AfterCollapse(ByVal sender As System.Object, ByVal e _
     As System.Windows.Forms.TreeViewEventArgs) Handles TreeView1.AfterCollapse
      MsgBox("Ich bin zugeklappt")
   End Sub
 
   Private Sub TreeView1_AfterExpand(ByVal sender As System.Object, ByVal e As _
     System.Windows.Forms.TreeViewEventArgs) Handles TreeView1.AfterExpand
      MsgBox("Ich bin aufgeklappt")
   End Sub
End Class

Gru?
---------------------------------------------------
Snoopy sagt - vb@rchiv find ich gut...
Schon gesehen? OSMMapViewer V2 Control