61、报告运行器：自定义报告设计的高效解决方案

c6d7e8f9g

于 2025-08-15 09:55:34 发布

阅读量19

点赞数

CC 4.0 BY-SA版权

分类专栏： Access 2013编程精髓文章标签：报告运行器自定义报告设计筛选条件

本文链接：https://blog.csdn.net/c6d7e8f9g/article/details/150985068

Access 2013编程精髓专栏收录该内容

73 篇文章 ¥399.00 ¥499.90

订阅专栏

超级会员免费看

报告运行器：自定义报告设计的高效解决方案

1. 报告运行器概述

报告运行器是一个强大且灵活的工具，它允许用户选择报告、设置筛选条件并运行经过筛选的报告。整个过程涉及多个步骤和代码逻辑，下面将详细介绍其实现原理和操作步骤。

2. 报告选择与初始化

当用户选择要运行的报告时，会触发一系列后台操作，确保报告的正确加载和数据准备。以下是相关代码：

Private Sub cboSelectReport_AfterUpdate()
  On Error GoTo TrapError
  Dim obj As AccessObject
  Dim db As Object
  Dim strReportName As Variant
  Dim strSQL As String
  Dim ctl As Control
  'Close any hidden reports that may have been opened by this form
  Set db = Application.CurrentProject
  For Each obj In db.AllReports
    If obj.IsLoaded Then
      DoCmd.Close obj.Type, obj.Name, acSaveNo
    End If
  Next
  'Open current report as hidden to get current recordsource
  strReportName = Me.cboSelectREport.Column(3)
  strSQL = "" 'ini