MS-Access 报告显示执行时的设计视图

Question

我在 MS Access 报告中创建了一个报告，并编写了一些 VBA 代码来检索数据并以 MS-Word 格式显示报告。 但是，在运行时生成报告时，报告首先显示或闪烁报告设计视图几秒钟，然后将生成报告。

我想找到一种解决方案来避免生成报告时设计视图的闪烁。 MS-Access 或 VBA 编码是否可行？ ??

我发布了我用来从访问表单代码调用访问报告的行。

DoCmd.OpenReport rst![参数], acPreview

这将生成报告，但设计屏幕在执行时会闪烁几秒钟。

并且访问报告中没有写入VBA代码。

实际运行是，我已在临时访问表中准备数据并从表中生成报告。

这里的问题是，在预览模式下启动报表时，报表的设计屏幕会显示几秒钟。 从用户方面来看，这看起来很糟糕。

Answer 1

如果您尝试此代码会发生什么：

  Dim strReport As Report        
  strReport = rst!Argument
  If SysCmd(acSysCmdGetObjectState, acReport, strReport) Then
     DoCmd.Close acReport, strReport
  End If
  DoCmd.OpenReport strReport, acPreview

该代码的作用是检查报表是否已在任何视图中打开，如果是则关闭它，然后打开它。 这可确保您不在设计视图中隐藏窗口。

该代码还避免了任何可能与将值从记录集传递到 OpenReport 命令相关的 ByRef 引用问题。

Answer 2

如何将报告导出到 MS-Word？ 代码是什么？

您是否尝试过使用简单的报告（带有表数据源）而不是使用 VBA 代码进行同样的操作？ 也许 VBA 运行时间太长，以至于它在设计模式下保持报表打开的时间足够长，足以被察觉。

Answer 3

当我从 VB6 应用程序调用 MS Access 报告时，也会发生同样的情况。 在我的例子中发生这种情况的原因是因为我设置了一个在启动时显示的表单。 如果您没有选择启动表单，则它不应该变得可见，因此不会闪烁。

让我知道这是否有帮助。

麦克风

Answer 4

您似乎正在设计视图中打开报表以更改某些属性。 也许可以避免这种情况，但您需要发布打开报告的代码才能确定。