为什么我的数据库对象没有显示记录集？

Question

为什么我的数据库对象没有显示记录集？为什么它不显示连接？代码的关键位是：

Public Sub PrintRecords()
  Dim dbCurr As DAO.Database
  Set dbCurr = CurrentDb

  Dim rsCourses as Recordset
  Set rsCourses = CurrentDb.OpenRecordset(“Courses”)
End Sub

这是我的屏幕截图，其中数据库有 tables（左上角），但 CurrentDB 对象有名称但没有 Recordsets（在下面的本地 window 中。）

对于它的价值，这是在 Access 2013 中，遵循 this 操作数据库的教程，停止错误“运行-时间错误'3078'：Microsoft Access 数据库引擎找不到输入 table 或查询”。但问题似乎比这更深。

Answer 1

你那里有印刷引号，使用直引号""。

并使用您指定的数据库对象：

Set rsCourses = dbCurr.OpenRecordset("Courses")

并且请不要post只有代码的屏幕截图，将代码本身复制并粘贴为文本。

为什么我的数据库对象没有显示记录集？

Why does my database object show no Recordsets?

ms-access

vba

ms-access-2013