尝试从我报告的另一个表中获取说明

Question

Private Sub Report_Open(Cancel As Integer)
Dim strResultDesc As String
strResultDesc = DLookup("Description", "[products/stock]", "[Product Code] = Me.txtResultPC.Value")
Text20.Value = strResultDesc
End Sub

这是我目前拥有的代码，我收到一个错误，说存在以下问题：

[Product Code] = Me.txtResultPC.Value

谁能发现什么？

更新：

也尝试了这种方法，

Private Sub Report_Open(Cancel As Integer)
Dim strResultDesc As String
strResultDesc = DLookup("Description", "[products/stock]", "[products/stock].[Product Code] = [Result PC]")
Me.Text20.Value = strResultDesc
End Sub

谢谢

鲍勃·

Answer 1

您必须输入符号"&"。请参阅下面的示例。

strResultDesc = DLookup("Description", "[products/stock]", "[Product Code] =" & Me.txtResultPC.Value)