Private Sub tv_uebersicht_AfterSelect(ByVal sender As System.Object, ByVal e As _
  System.Windows.Forms.TreeViewEventArgs) Handles tv_uebersicht.AfterSelect
        Dim node As TreeNode
        node = tv_uebersicht.SelectedNode
 
        If (node.Index = 0) And (tv_uebersicht.) Then 'Projekt
            Me.tbGeschichte.BringToFront()
        End If
        If node.Index = 1 Then 'Figuren
            Me.tbFiguren.BringToFront()
        End If
        If node.Index = 2 Then 'Umgebung
            Me.tbUmgebung.BringToFront()
        End If
        If node.Index = 3 Then 'Plot
            Me.tbPlot.BringToFront()
        End If
        If node.Index = 4 Then 'Notizen
            Me.tbNotizen.BringToFront()
        End If
        If node.Index = 0 Then 'Geschichte
            Me.tbGeschichte.BringToFront()
        End If
    End Sub