ADODB中怎样用网格显示?

daryl715 2002-04-02 05:37:20
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来说,他们有什么差别?
...全文
9 点赞 收藏 7
写回复
7 条回复
切换为时间正序
当前发帖距今超过3年,不再开放新的回复
发表回复
ferrytang 2002-04-04
代码给你了
回复
daryl715 2002-04-02
把datagrid换成MSHFlexGrid1就没问题了
但为什么datagrid和MSFlexGrid1就不成
和ferrytang说的事前绑定和后期绑定有关吗?

什么叫事前绑定和后期绑定
回复
daryl715 2002-04-02
to ferrytang
那里啊,我不知道那段代码是绑定

是不是可以像data+msflexgrid那样自动降示出所有数据呢?
回复
daryl715 2002-04-02
to blkand 不成啊
to ferrytang
事前,后期是什么意思啊,不明白
回复
ferrytang 2002-04-02
2.datagrid是事前绑定
mshflexgrid是后期绑定
回复
blkant 2002-04-02
Dim rst As ADODB.Recordset修改为Dim rst As new ADODB.Recordset
回复
ferrytang 2002-04-02
1.我给你的代码中有例子的,就是frmsalary
2.datagrid是前绑定
mshflexgrid事后绑定
回复
相关推荐
发帖
VB基础类
创建于2007-09-28

7492

社区成员

VB 基础类
申请成为版主
帖子事件
创建了帖子
2002-04-02 05:37
社区公告
暂无公告