为什么set mshflexgrid.datasource=rs之后，在mshflexgrid中显示表中第一条记录？

Question

为什么set mshflexgrid.datasource=rs之后，在mshflexgrid中显示表中第一条记录？rs为一个adodb.recordset

Answer 1

rs.CursorType = adOpenKeyset
rs.LockType = adLockOptimistic

Answer 2

是不是 rs.recordset的返回纪录就一条啊？？？？

Answer 3

'显示数据
Private Sub ShowData()
Dim col, row As Integer
MSHFlexGrid1.Rows = rs.RecordCount + 1Do While rs.EOF = False
    row = row + 1 '表的行
    For col = 0 To 8 '表共有9个字段 即共9列
        Select Case col
            Case 3 To 4
                MSHFlexGrid1.TextMatrix(row, col) = Format(rs.Fields(col), "yyyy年mm月dd")
            Case Else
                MSHFlexGrid1.TextMatrix(row, col) = rs.Fields(col)
        End Select
    Next col
    rs.MoveNext
Loop
End Sub

Answer 4

with MSHFlexGrid1
     .rows=1
     do while Not rst.eof
          MSHFlexGrid1.additem rst.fields(0).value & ""
          rst.movenext
     loop
end with

Answer 5

加一句：rs.CursorLocation = adUseClient