Private Sub MenüleisteToolStripMenuItem_Click(ByVal sender As _
      System.Object, ByVal e As System.EventArgs) Handles _
      MenüleisteToolStripMenuItem.Click
        If Me.ToolBar.Visible = True Then
            Me.ToolBar.Visible = False
            Me.MenüleisteToolStripMenuItem.Checked = False
            If FontBar.Visible = True Then
                FontBar.SetBounds(0, 24, Width, Height, BoundsSpecified.All)
                Me.TXT.SetBounds(0, 56, Width, Height, BoundsSpecified.All)
            ElseIf FontBar.Visible = False Then
                Me.TXT.SetBounds(0, 24, Width, Height, BoundsSpecified.All)
            Else
                Me.ToolBar.Visible = True
                Me.MenüleisteToolStripMenuItem.Checked = True
                Me.TXT.SetBounds(0, 56, Width, Height, BoundsSpecified.All)
            End If
        End If
    End Sub