有Dlookup问题。代码不起作用?

时间:2012-10-09 12:04:50

标签: database vba ms-access

基本上它说我缺少运营商?

Dim descpc As String

despc = DLookup("[Description]", "[products/stock]", "[Product Code] = " & Me.cmbSource.Value)
Me.Text47.Value = despc

任何人都能看到任何东西吗?我不是100%与Dlookup一起,所以任何帮助都会很棒!

谢谢Bob P

1 个答案:

答案 0 :(得分:1)

您将cmbSource作为字符串进行调整,因此您需要将值括在sigle引号中以处理字符串。此外,如果Product Code是一个数字,如果您尝试将字符串与整数进行比较,则可能会出错。试试这个:

despc = DLookup("[Description]", "[products/stock]", "[Product Code] = '" & Me.cmbSource & "'")