请问DAO和MSFLEXGRID的联接问题!!!

michaelpeng7799 2002-06-02 12:14:38
现在要用DAO联MDB,并且要结果显示在MSFLEXGRID里。
这个如果是ADO当然都没问题了,可是现在偏要用DAO来做,真没办法。
Dim sql As String
Dim rd As Recordset
Dim Db As Database
Private Sub Form_Load()
Set Db = OpenDatabase("Cnwind.mdb")
Set rd = Database.OpenRecordset("select * from ²úÆ· where µ¥¼Û>18", dbOpenDynaset)
Grid1.DataSource = rd 'grid1 is msflexgrid
End Sub

上面的程序运行倒数第二行就出错,好像是不能联。。
怎么办???难道以前用DAO写程序的都不把结果显示在表格里么???


...全文
42 4 打赏 收藏 转发到动态 举报
写回复
用AI写文章
4 条回复
切换为时间正序
请发表友善的回复…
发表回复
飞不动 2002-06-02
  • 打赏
  • 举报
回复
这一名错了,为对象赋值,应该用set
正确的写法是
Set Grid1.DataSource=rd
czj2000 2002-06-02
  • 打赏
  • 举报
回复
还有你的路径好象也不对吧
michaelpeng7799 2002-06-02
  • 打赏
  • 举报
回复
set 也没有啊。。
Celn_C 2002-06-02
  • 打赏
  • 举报
回复
同意!

在程序中给DataGrid控件写DataSource时必须在前面加上“Set”!

7,789

社区成员

发帖
与我相关
我的任务
社区描述
VB 基础类
社区管理员
  • VB基础类社区
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧