Ms access 使用Access中的SQL语句计数记录集-运行时错误3075

Ms access 使用Access中的SQL语句计数记录集-运行时错误3075,ms-access,vba,Ms Access,Vba,我是一个新的访问和尝试计数的行数在一个数据集中,我使用下面的代码。我得到一个运行时错误,这似乎是因为SQL语句。我从一个查询中复制了它,所以不确定我做错了什么 Function RecordCount() Dim db As DAO.Database Dim rst As DAO.Recordset Dim sqlstring As String Dim x As Integer Dim FindRecordCount As Integer sqlstring = "SELECT Questi

我是一个新的访问和尝试计数的行数在一个数据集中,我使用下面的代码。我得到一个运行时错误,这似乎是因为SQL语句。我从一个查询中复制了它,所以不确定我做错了什么

Function RecordCount()
Dim db As DAO.Database
Dim rst As DAO.Recordset
Dim sqlstring As String
Dim x As Integer
Dim FindRecordCount As Integer

sqlstring = "SELECT Question_List.Questions, Question_List.[Freq] FROM Question_List WHERE (((Question_List.ClientCd)=`" & [Forms]![TestControlCreate]![ComClient] & "));"


   Set db = CurrentDb

   Set rst = db.OpenRecordset(sqlstring) 

   FindRecordCount = rst.RecordCount

Return
End Function

应按照以下方式重构SqlString:

 sqlstring = "SELECT Question_List.[Questions], Question_List.[Freq] FROM Question_List WHERE Question_List.[ClientCd]= '" & [Forms].[TestControlCreate].[ComClient] & "';"

谢谢HansUp不,这是一个错误类型,看起来很有帮助,但我现在得到了一个不同的错误-运行时错误3061参数太少。ClientCd字段为文本