怎么使 MSFlexGrid 中显示 DAO 中RecordSet 语句中的内容？？加急！在现等待

Question

用循环嵌套
for i=0 to 记录个数－1
    for j=0 to 字段个数－1
        向MSfLEXGRID的表格中赋值
    next  j
next i

Answer 1

我看得不太懂，能不能据一个实例？向MSfLEXGRID的表格中赋值 具体怎么做？
谢谢你了！！！！！！！！

Answer 2

msflexgrid赋值必须每一个单元格单独赋值，或者先将recordse的数据给一个数组，然后再给msfexgrid.
 
   On Error Resume Next
    cnn.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=C:\Program Files\Microsoft Visual Studio\VB98\BIBLIO.MDB;Persist Security Info=False"
    cnn.Open
    rs.Open "select * from publishers ", cnn, adOpenStatic, adLockReadOnly
    MSgrid1.Rows = rs.RecordCount - 1
    MSgrid1.Cols = rs.Fields.Count
    For i = 1 To rs.RecordCount - 1
        MSgrid1.Row = i
        For j = 0 To rs.Fields.Count
            MSgrid1.Col = j
            MSgrid1.Text = rs.Fields(j).Value
        Next j
        rs.MoveNext
    Next i