如何将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中的字段，你应该将它用作查询字符串中的键值占位符。你只是在那里引用表单。在那里也添加那个表单字段名称，无论哪个字段包含您正在查找的键值。

有关详细信息，请参阅：this MSDN page。