为什么我会收到错误3061？

我得到这个错误3061，太少参数：为什么我会收到错误3061？

Dim PrbApps1 As Recordset 

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

其中TenderID是一个文本框

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

2013-08-01 eoinone

您需要在文本框值的另一侧加上双引号。但是，如果它在一个访问形式，它应该与Me.

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

2013-08-01 12:07:27 Grant

由于被引用，它实际上需要“以及=””＆Me.TenderID.Value＆“'”）为什么我不知道。 – eoinone

FYI ，使用me！而不是me。me。引用文本框作为me对象的属性me！创建文本框作为对象，当你有很多引用时它会执行得更快一些（虽然intellisense不起作用它可悲） – Elias

我不知道，我认为这只是偏好。谢谢@Elias – Grant

回答