如何将单个记录从Microsoft Access表单打印到报表中

Question

我是Access和VB的新手，我要打印一条特定记录..但是我收到此代码错误：

Private Sub printEksternAVR_Click()
DoCmd.OpenReport [Report_AVR Ekstern], acViewPreview, , [Report_AVR Ekstern].Rapport_nr = Forms!Form_AVR

End Sub

我的报告名称是AVR Ekstern，主键是Rapport nr，单击该按钮并查看记录的表单是AVR

我想我沿途误解了一些东西，所以我真的希望有人能在这里帮助我吗？

Answer 1

WHERE条件是一个字符串。 您需要将该参数用引号引起来。 假设Rapport_nr是一个整数：

Private Sub printEksternAVR_Click()
DoCmd.OpenReport [Report_AVR Ekstern], acViewPreview, , "Rapport_nr = " & Forms!Form_AVR

End Sub

等等，您还缺少Forms！Form_AVR中的字段，该字段应用作查询字符串中的键值占位符。 您只是在引用表单本身。 在该字段的末尾也添加该表单字段名称，无论哪个字段包含您要查找的键值。

请参阅： 此MSDN页面以获取更多详细信息。