database - 如何将 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是一个整数：

私有子 printEksternAVR_Click()
DoCmd.OpenReport [Report_AVR Ekstern], acViewPreview, , "Rapport_nr = " & Forms!Form_AVR

结束子

呃等等，您还缺少 Forms!Form_AVR 中的字段，您应该将其用作查询字符串中的键值占位符。您只是在此处引用表单本身。在最后添加该表单字段名称，无论哪个字段包含您正在查找的键值。

有关更多详细信息，请参阅：此 MSDN 页面。