怎样在datagrid中插入一列

Question

在datagrid的第一列前面插入一列，用于放序号，不知道怎么实现

Answer 1

通过sql语句实现,返回一个有序号的记录集.
或者使用vsflexgrid

Answer 2

记录集中的序号是自动增长的，所以不好使用
用DATAGRID难道不能实现吗

Answer 3

Private Sub Command1_Click()
    DataGrid1.Col = 0
    DataGrid1.Row = 2
    DataGrid1.Text = "lxcc"End SubPrivate Sub Form_Load()
    Dim adoRecordset As ADODB.Recordset
    Set adoRecordset = New ADODB.Recordset
    Dim i As Integer
    For i = 0 To 2 '为Recordset三个字段,即为 DataGrid 添加三列
    adoRecordset.Fields.Append "第" & i & "列", adVariant, adFldMayBeNull, adFldIsNullable + adFldUpdatable
    Next i
    adoRecordset.Open
    For i = 0 To 3
    adoRecordset.AddNew '加四条记录,即为 DataGrid 添加四空行
    Next i
    Set DataGrid1.DataSource = adoRecordset '绑定 DataGrid 的数据源
    adoRecordset.MoveFirst
    DataGrid1.Columns(0).NumberFormat = "long date"
    DataGrid1.Columns(0).Button = True
    
End Sub