VB.net中为DataGridView添加记录序号（转帖）

VB.net中为DataGridView添加记录序号（转帖）

在数据库处理中常常用到数据库搜索并用DataGridView来显示查询结果，但无法在首列中显示当前编号。

一般对于大量数据来说（不大于1000），我们也就没必要添加序号了，对于小量数据（小于1000）我们可以定义如下过程进行编号：

Sub addnum(ByVal rn As Integer)

Dim i As Integer
For i = 1 To rn - 1
DataGridView1.Rows(i - 1).Cells(0).Value = i
Next
DataGridView1.Refresh()
End Sub

代码中rn为DataGridView中的行数；

在DataGridView控件上点右键编辑列，添加一个未绑定的列标头，如取名为"序号";

DataGridView1.Rows(i - 1).Cells(0).Value 中Cell(0)表示第一列，我的序列排在第1列所以为0，若在第3列则为2；

这样在完成查询后调用addnum过程就可以添加序号了，如：addnum(DataGridView1.RowCount)。