1

我收到错误 3061,此参数太少:

Dim PrbApps1 As Recordset

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

其中 TenderID 是一个文本框

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

4

1 回答 1

1

您需要在文本框值的另一侧使用双引号。但如果它是一个访问形式,它应该被引用Me.

Set PrbApps1 = CurrentDb.OpenRecordset("Select * FROM [Application] WHERE [PYR_TenderRef] = '" & Me!TenderID.Value & "'")
于 2013-08-01T12:07:27.077 回答