Private Sub cmd_menü_Click(ByVal sender As System.Object, ByVal e As _
   System.EventArgs) Handles cmd_menü.Click
        pan_menue.Controls.Clear()
        Dim ChildForm As New frm_main_menue
        With ChildForm
            .TopLevel = False
            .Visible = True
            .Parent = pan_menue
            .StartPosition = FormStartPosition.CenterParent
        End With
        Me.pan_menue.Controls.Add(ChildForm)
 
 
        lbl_section_headline.Text = "Menü"
    End Sub