Private WithEvents mnuDisplayForm As ToolStripMenuItem
    Private WithEvents mnuSep1 As ToolStripSeparator
    Private WithEvents mnuExit As ToolStripMenuItem
 
 
    Public Sub New()
 
        'Initialize
        mnuDisplayForm = New ToolStripMenuItem("Konfiguration")
        mnuDisplayForm.DropDownItems.Add("myUnterEbene1")
        mnuDisplayForm.DropDownItems.Add("myUnterEbene2")
        mnuDisplayForm.DropDownItems.Add("myUnterEbene3")
        mnuDisplayForm.DropDownItems.Add("myUnterEbene4")
        mnuDisplayForm.DropDownItems.Add("myUnterEbene_n")
 
        mnuSep1 = New ToolStripSeparator()
        mnuExit = New ToolStripMenuItem("Exit")
        MainMenu = New ContextMenuStrip
        MainMenu.Items.AddRange(New ToolStripItem() {mnuDisplayForm, mnuSep1, _
          mnuExit})