#Dynamischer Container 1
WERT ¿ INHALT
WERT ¿ INHALT
WERT ¿ INHALT
 
#Dynamischer Container 2
WERT ¿ INHALT
WERT ¿ INHALT

 
    Private Sub KatBauenToolStripMenuItem_Click(ByVal sender As System.Object, _
      ByVal e As System.EventArgs) Handles KatBauenToolStripMenuItem.Click
        Dim myString As String = My.Settings.sender
        Dim Zeilen() As String, zeile As Long
        Dim Element() As String
        Dim Element2() As String
        Zeilen = Split(myString, vbNewLine)
        MeineSenderToolStripMenuItem.DropDownItems.Clear()
        For zeile = 0 To UBound(Zeilen)
            Element = Split(Zeilen(zeile), " ¿ ")
            Element2 = Split(Zeilen(zeile), "#")
            If Zeilen(zeile).StartsWith("#") Then
                MeineSenderToolStripMenuItem.DropDownItems.Add(Element2(1))
            End If
        Next
    End Sub

Menü
-Meine Sender
--Dynamischer Container 1
---WERT ¿ INHALT
---WERT ¿ INHALT
---WERT ¿ INHALT
--Dynamischer Container 2
---WERT ¿ INHALT
---WERT ¿ INHALT