Создание меню программно DevExpress

Question

Как создать меню динамически?

Подробно хочу:

• Создать новую страницу ленты (вкладка, я думаю, она называется страницей ленты)
• Далее создайте заголовок для страницы
• Затем добавьте 2 группы лент и добавьте к ним заголовки
• Затем добавьте 3 элемента панели кнопок к первой группе лент

Как это сделать?

Answer 1

 Dim menu As New RibbonControl


    Dim aPage As New RibbonPage("Nicks Page")

    'groups
    Dim aGroup1 As New RibbonPageGroup("1st Group")


    'ADD BUTTONS TO RIBBON GROUP HERE
    Dim i As New DevExpress.XtraBars.BarButtonItem()

    i.Caption = "Nicks Button"

    aGroup1.ItemLinks.Add(i)




    Dim i2 As New DevExpress.XtraBars.BarButtonItem()
    i2.Caption = "Nicks Other Button"

    aGroup1.ItemLinks.Add(i2)




    aPage.Groups.Add(aGroup1)

    menu.Pages.Add(aPage)

    Me.Controls.Add(menu)