如何避免MS Access开发时反复运行耗时的存储过程？

• 开发期间临时替换为静态数据源
  先手动执行一次存储过程，将结果导出到一个临时表（比如tmp_ReportData），然后把报表的RecordSource改成这个临时表。开发完成后，再改回绑定存储过程。这样切换视图、调整控件时，Access只会读取静态表，不会反复调用耗时的存储过程。

• 通过VBA控制数据源加载时机
  不要直接把存储过程设为报表的RecordSource，而是在报表的Open事件中通过VBA动态设置，并且仅在预览/打印时加载：

  Private Sub Report_Open(Cancel As Integer)
      ' 仅在报表视图或打印预览时加载数据源
      If Me.CurrentView = acViewReport Or Me.CurrentView = acViewPreview Then
          Me.RecordSource = "EXEC YourComplexStoredProcedure"
      Else
          ' 设计/布局视图时绑定空数据集，避免触发存储过程
          Me.RecordSource = "SELECT * FROM tmp_EmptyTable" ' 提前建一个空表
      End If
  End Sub
  

  这样切换到设计/布局视图时，报表只会读取空表，不会执行存储过程。

• 优化存储过程的执行效率
  从根源减少等待时间：

  • 给存储过程涉及的表添加合适的索引，覆盖查询用到的筛选、排序字段
  • 拆分复杂逻辑，将中间结果暂存到临时表，避免重复计算
  • 移除不必要的字段、JOIN操作或聚合计算，只保留报表需要的数据
  • 检查是否有可以提前计算的常量值，避免每次执行都重新计算

• 利用内存记录集缓存数据
  在调用报表的窗体中提前执行存储过程，将结果存入内存记录集，然后让报表绑定这个记录集：

  ' 窗体中打开报表的代码
  Dim rs As ADODB.Recordset
  Set rs = New ADODB.Recordset
  rs.Open "EXEC YourComplexStoredProcedure", CurrentProject.Connection, adOpenStatic, adLockReadOnly
  
  ' 打开报表并绑定记录集
  DoCmd.OpenReport "YourReport", acViewPreview
  Set Reports("YourReport").Recordset = rs
  

  这样即使多次切换视图，只要记录集没释放，就不会重新执行存储过程。

• 调整Access开发环境设置

  • 关闭Access选项中的“设计视图中自动刷新数据”（路径：文件 > 选项 > 当前数据库 > 应用程序选项）
  • 在布局视图中操作时，暂时断开报表的数据源（右键报表 > 数据源 > 选择“无”），修改完成后再重新绑定

内容的提问来源于stack exchange，提问作者whatwhatwhat