这个问题可能是由于 Access 查询超时或异常关闭导致的。请按照以下步骤进行操作:
在 Access 中打开受影响的查询。
单击'设计”选项卡,使用 SQL 视图编辑查询。
确认查询是否已缩短为'SELECT;”。如果是,请将查询重新编辑为完整的 SELECT 语句,并按预期保存更改。
如果问题仍然存在,请使用以下 VBA 代码清除缓存并重新打开查询:
Dim db As DAO.Database
Dim qdf As DAO.QueryDef
Set db = CurrentDb()
Set qdf = db.QueryDefs("MyQueryName")
qdf.Close
Set qdf = Nothing
db.QueryDefs.Refresh
Set qdf = db.QueryDefs("MyQueryName")
qdf.Execute
其中'MyQueryName”应替换为您要打开的查询的名称。这将强制 Access 刷新查询并重新打开它。