尝试使用表单字段作为条件时的 DLookup

Question

我是 Access 的新手，也是 VB。我有一个显示变压器信息的报告，该报告显示来自查询来自两个不同表的数据的查询的数据。我想用一个按钮打开保存在其中一个表格中的 PDF 文档。

我目前的代码是这样的：

Private Sub Command70_Click()

    Dim hypa As String

    hypa = DLookup("[TestReport]", "TransformerPics", "TxID =  " & [Reports]![TransformerInfoSheet]!TXID)

    Application.FollowHyperlink [hypa]

End Sub

我得到的错误是Run-time error '2471' The expression you have entered as a parameter produced this error: 'TP00686'

TP00686 是报告中显示的变压器编号。

Answer 1

您需要在其中引用一些引号：

hypa = DLookup("[TestReport]", "TransformerPics", "TxID =  '" & [Reports]![TransformerInfoSheet]!TXID & "'")

另请参阅：

尝试使用表单字段作为条件时的 DLookup

DLookup When Trying Use Form Field as Criteria

vba

ms-access-2013