Private Sub TreeView1_AfterSelect(ByVal sender As System.Object, ByVal e As _
      System.Windows.Forms.TreeViewEventArgs) Handles TreeView1.AfterSelect
        Select Case e.Node.Text
            Case "Knoten0"    'Name des Knotens
                MsgBox("1")
            Case "Knoten1"
                MsgBox("2")   'Name des Knotens
        End Select
    End Sub