ترقيم الصفوف في رأس الصف في شكبة البيانات DataGridView

ترقيم الصفوف في رأس الصف في شكبة البيانات DataGridView

كما في الصورة

الكود

For i As Integer = 0 To DataGridView1.Rows.Count - 1

            DataGridView1.Rows(i).HeaderCell.Value = (i + 1).ToString

        Next