ADODB中怎样用网格显示？

[daryl715]

Private Sub Command1_Click()
Dim cnn1 As ADODB.Connection
Dim rst As ADODB.Recordset
Dim cnnstr As String
Set cnn1 = New ADODB.Connection
Set rst = New ADODB.Recordset

cnnstr = " provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & App.Path & "\test.mdb;"
cnn1.Open cnnstr

rst.CursorType = adOpenKeyset
rst.LockType = adLockOptimistic
rst.Open "select * from stu", cnn1 //stu为数据库中的表

Print rst.Fields(0)
Print rst.Fields(1)
Print rst.Fields(2)
Print rst.Fields(3)
Print rst.Fields(4)

End Sub

以上代码可以读出表中的数据，并打印
但我想让表中所有的数据显示在网格中，该怎样做？
我在end sub 上面加上Set MSFlexGrid1.DataSource = rst，为什么提示“对象变量或with块变量未设置"
但把msflexgrid换成datagrid就不会提示出错，但显示不了数据

问题
1。怎样争取的将数据显示在网格上？
2。msflexgrid和datagrid为什么结果不同，对ADO来说，他们有什么差别？

[ferrytang]

1.我给你的代码中有例子的，就是frmsalary
2.datagrid是前绑定
mshflexgrid事后绑定

[blkant]

Dim rst As ADODB.Recordset修改为Dim rst As new ADODB.Recordset

[ferrytang]

2.datagrid是事前绑定
mshflexgrid是后期绑定

[daryl715]

to blkand 不成啊
to ferrytang
事前，后期是什么意思啊，不明白

[daryl715]

to ferrytang
那里啊，我不知道那段代码是绑定

是不是可以像data+msflexgrid那样自动降示出所有数据呢？

[daryl715]

把datagrid换成MSHFlexGrid1就没问题了
但为什么datagrid和MSFlexGrid1就不成
和ferrytang说的事前绑定和后期绑定有关吗？

什么叫事前绑定和后期绑定

[ferrytang]

代码给你了