How to have a combination of ComboBox and ButtonEdit cell within a single Grid cell in WinForms GridControl?

#region combocell model
class ComboCellModel : GridComboBoxCellModel
{
public ComboCellModel(GridModel grid)
    : base(grid)
{
    //Set the size of the button bar.
    ButtonBarSize = new System.Drawing.Size(30, 15);
}
public override GridCellRendererBase CreateRenderer(GridControlBase control)
{
    return new ComboCellRenderer(control, this);
}
}

#Region "combocell model"
Friend Class ComboCellModel
 Inherits GridComboBoxCellModel
Public Sub New(ByVal grid As GridModel)
 MyBase.New(grid)
 'Set the size of the button bar.
 ButtonBarSize = New System.Drawing.Size(30, 15)
End Sub
Public Overrides Function CreateRenderer(ByVal control As GridControlBase) As GridCellRendererBase
 Return New ComboCellRenderer(control, Me)
End Function
End Class
 

#region Combocell cellRenderer
class ComboCellRenderer : GridComboBoxCellRenderer
{
public GridCellButton button;
public ComboCellRenderer(GridControlBase control, GridCellModelBase model)
: base(control, model)
{
button = new GridCellButton(this);
            
//Add the button to the comboBox cell
this.AddButton(button);
}
}

#Region "Combocell cellRenderer"
Friend Class ComboCellRenderer
 Inherits GridComboBoxCellRenderer
Public button As GridCellButton
Public Sub New(ByVal control As GridControlBase, ByVal model As GridCellModelBase)
 MyBase.New(control, model)
button = New GridCellButton(Me)
 
'Add the button to the comboBox cell
Me.AddButton(button)
End Sub
 

this.gridControl1.Model.CellModels.Add("ComboBoxButtonEditCell", new ComboCellModel(this.gridControl1.Model));

Me.gridControl1.Model.CellModels.Add("ComboBoxButtonEditCell", New ComboCellModel(Me.gridControl1.Model))

this.gridControl1[2, 3].CellType = "ComboBoxButtonEditCell";

Me.gridControl1(2, 3).CellType = "ComboBoxButtonEditCell"

ComboCellRenderer renderer = gridControl1.GetCellRenderer(2, 3) as ComboCellRenderer;
renderer.button.Clicked += button_Clicked;
                   
}
void button_Clicked(object sender, GridCellEventArgs e)
{
MessageBox.Show(String.Format("Button Edit Pressed at ({0},{1})", e.RowIndex, e.ColIndex));
}

Private renderer As ComboCellRenderer = TryCast(gridControl1.GetCellRenderer(2, 3), ComboCellRenderer)
Private renderer.button.Clicked += AddressOf button_Clicked
 
}
Private Sub button_Clicked(ByVal sender As Object, ByVal e As GridCellEventArgs)
MessageBox.Show(String.Format("Button Edit Pressed at ({0},{1})", e.RowIndex, e.ColIndex))
End Sub