Question

如何以编程方式向我的功能区组添加按钮？到目前为止，我的代码是成功添加新的ribbonPage，然后将RibbonGroup添加到页面。但是我需要在ribbonGroup中添加按钮而不能为我工作

Imports DevExpress.XtraBars.Ribbon

Public Class Form1


    Private Sub Form1_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
        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



        aPage.Groups.Add(aGroup1)

        menu.Pages.Add(aPage)

        Me.Controls.Add(menu)

    End Sub

Answer 1

您需要为功能区控件创建一个新按钮：

Dim newButton As New DevExpress.XtraBars.BarButtonItem

然后将其添加到功能区页面组

aGroup1.Container.Add(newButton)

将一个按钮添加到功能区组DevExpress

1 个答案: