为什么我收到错误3061？

Question

我收到错误3061，参数太少：

Dim PrbApps1 As Recordset

Set PrbApps1 = CurrentDb.OpenRecordset("Select * FROM [Application] WHERE [PYR_TenderRef] =" & TenderID.Value)

其中TenderID是文本框

我是新手，但我已经检查了我能想到的一切。可能是简单的错误，但任何帮助将不胜感激。

Answer 1

您需要在文本框值的另一侧使用双引号。但如果它在访问表单中，则应使用Me.

引用

Set PrbApps1 = CurrentDb.OpenRecordset("Select * FROM [Application] WHERE [PYR_TenderRef] = '" & Me!TenderID.Value & "'")