using DevExpress.XtraGrid.Views.Base;
using DevExpress.Data;

private void gridView1_CustomDrawFooter(object sender, RowObjectCustomDrawEventArgs e) {
   e.Graphics.FillRectangle(new SolidBrush(Color.Black), e.Bounds);
   string footerText = "Selected Rows: " + gridView1.SelectedRowsCount.ToString();
   StringFormat outStringFormat = new StringFormat();
   outStringFormat.Alignment = StringAlignment.Near;
   outStringFormat.LineAlignment = StringAlignment.Center;
   e.Graphics.DrawString(footerText, new Font("Arial", 14, FontStyle.Bold), 
     new SolidBrush(Color.White), e.Bounds, outStringFormat);
   e.Handled = true;
}
private void gridView1_SelectionChanged(object sender, SelectionChangedEventArgs e) {
   gridView1.InvalidateFooter();
}

Imports DevExpress.XtraGrid.Views.Base
Imports DevExpress.Data

Private Sub GridView1_CustomDrawFooter(ByVal sender As Object, _
ByVal e As RowObjectCustomDrawEventArgs) Handles GridView1.CustomDrawFooter
   e.Graphics.FillRectangle(New SolidBrush(Color.Black), e.Bounds)
   Dim footerText As String = "Selected Rows: " + GridView1.SelectedRowsCount.ToString()
   Dim outStringFormat As StringFormat = New StringFormat()
   outStringFormat.Alignment = StringAlignment.Near
   outStringFormat.LineAlignment = StringAlignment.Center
   e.Graphics.DrawString(footerText, New Font("Arial", 14, FontStyle.Bold), _
     New SolidBrush(Color.White), _
     New RectangleF(e.Bounds.X, e.Bounds.Y, e.Bounds.Width, e.Bounds.Height), outStringFormat)
   e.Handled = True
End Sub

Private Sub GridView1_SelectionChanged(ByVal sender As Object, _
ByVal e As SelectionChangedEventArgs) Handles GridView1.SelectionChanged
    GridView1.InvalidateFooter()
End Sub