如何在 Access 2010 中一键打印

Question

我想在 Access 2010 中的表单上创建一个按钮，单击该按钮时会打印表单的当前记录/视图。我尝试了各种 VBA 脚本。有些会打印所有记录，有些会打印表单的部分内容，但不会打印整个表单。

如果我按下 Ctrl-P，然后选择“选定的记录”，然后单击“确定”，它就会很好地打印表单的当前记录/视图。

我可以在 On Click 事件过程中放入什么代码来执行与 Ctrl-P、“选定记录”和“确定”相同的操作，而无需用户执行所有这些操作？

Answer 1

我找到了答案。我将表单保存为报告，然后在表单上创建了一个按钮，其代码如下：

Dim strReportname As String
Dim strCriteria As String

strReportname = "ReportfrmClients"
strCriteria = "[ClientID] = " & Me!ClientID

DoCmd.OpenReport strReportname, acNormal, , strCriteria

这会将报告直接发送到打印队列而无需打开它。并且它只向报告发送一个 ClientID，因此报告只打印一条记录。