To reproduce:

Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
    Me.CustomersTableAdapter.Fill(Me.NwindDataSet.Customers)

    Me.RadGridView1.BestFitColumns(Telerik.WinControls.UI.BestFitColumnMode.AllCells)
    Me.RadGridView1.Columns(2).IsPinned = True
    Me.RadGridView1.Columns(2).PinPosition = Telerik.WinControls.UI.PinnedColumnPosition.Left
    Me.RadGridView1.Columns(5).IsPinned = True
    Me.RadGridView1.Columns(5).PinPosition = Telerik.WinControls.UI.PinnedColumnPosition.Left
    Dim summaryItem As New GridViewSummaryItem()
    summaryItem.Name = "ContactTitle"
    summaryItem.Aggregate = GridAggregateFunction.Count

    Dim summaryRowItem As New GridViewSummaryRowItem()
    summaryRowItem.Add(summaryItem)
    Me.RadGridView1.SummaryRowsBottom.Add(summaryRowItem)

    Me.RadGridView1.MasterTemplate.ShowTotals = True
    Me.RadGridView1.EnableKineticScrolling = True
    Me.RadGridView1.MasterView.SummaryRows(0).PinPosition = PinnedRowPosition.Bottom
End Sub

Please refer to the attached gif file.