How to change the size of scrollbars on demand in WinForms GridGroupingControl?

public Form1()
{   
    this.gridGroupingControl1.TableControl.HScroll = true;
    this.gridGroupingControl1.ableControl.VScroll = true;
    if (gridGroupingControl1.TableControl.HScrollBar.InnerScrollBar != null && this.gridGroupingControl1.TableControl.VScrollBar.InnerScrollBar != null)
    {
        this.gridGroupingControl1.TableControl.VScrollBar.InnerScrollBar.Width = 50;
        this.gridGroupingControl1.TableControl.HScrollBar.InnerScrollBar.Height = 50;
    }
} 

Public Sub New() 
     Me.gridGroupingControl1.TableControl.HScroll = True
     Me.gridGroupingControl1.TableControl.VScroll = True 
     If gridGroupingControl1.TableControl.HScrollBar.InnerScrollBar IsNot Nothing AndAlso Me.gridGroupingControl1.TableControl.VScrollBar.InnerScrollBar IsNot Nothing Then
        Me.gridGroupingControl1.TableControl.VScrollBar.InnerScrollBar.Width = 50
        Me.gridGroupingControl1.TableControl.HScrollBar.InnerScrollBar.Height = 50
     End If
End Sub

//Event Subscription
this.gridGroupingControl1.TableControl.ControlAdded += TableControl_ControlAdded;
 
//Event customization
private void TableControl_ControlAdded(object sender, ControlEventArgs e)
{
    HScrollBarCustomDraw hscrollBar = e.Control as HScrollBarCustomDraw;
    VScrollBarCustomDraw vScollBar = e.Control as VScrollBarCustomDraw;
    if (hscrollBar != null)
    {
        hscrollBar.Height = 50;
    }

    if (vScollBar != null)
    {
        vScollBar.Width = 50;
    }
}

'Event Subscription
AddHandler Me.gridGroupingControl1.TableControl.ControlAdded, AddressOf TableControl_ControlAdded
 
'Event customization
Private Sub TableControl_ControlAdded(ByVal sender As Object, ByVal e As ControlEventArgs)
    Dim hscrollBar As HScrollBarCustomDraw = TryCast(e.Control, HScrollBarCustomDraw)
    Dim vScollBar As VScrollBarCustomDraw = TryCast(e.Control, VScrollBarCustomDraw)
    If hscrollBar IsNot Nothing Then
      hscrollBar.Height = 50
    End If
    If vScollBar IsNot Nothing Then
      vScollBar.Width = 50
    End If
End Sub