Access - Sigo con problemas con el codigo vb

He probado varias formas para poder asignar el valor de un campo de una consulta a una variable pero no hay forma de que funcione.
Esto es lo que tengo y a ver si se alguien me puede ayudar:

Private Sub Cuadro67_Click()

Dim Valor As String
Dim mRs As Recordset
Dim datos As Database

Set datos = Access.CurrentDb

Set mRs = datos.OpenRecordset("SELECT tblCarParkPlace.CarParkPlaceNumber FROM CarParkPlacesNoAvariables ORDER BY tblCarParkPlace.CarParkPlaceNumber ASC", dbOpenSnapshot)

'donde tblCarParkPlace.CarParkPlaceNumber es el campo
' y CarParkPlacesNoAvariables es el nombre de la consulta

Valor = mRs!CarParkPlaceNumber

End Sub

Cuando se ejecuta aparece el siguiente mensaje:
Error 3061....pocos parámetros se esperaban 2 y me marca la linea del Set mRS=.....

NECESITO AYUDA!!!! Gracias!!!

Hola:

Tienes mal la cadena SELECT, sería:

SELECT CarParkPlaceNumber FROM CarParkPlacesNoAvariables ORDER BY CarParkPlaceNumber ASC"

Se hace:

SELECT campo FROM tabla

o

SELECT campo FROM consulta

Además, si quieres capturar el PRIMER VALOR, has de poner TOP 1 de esta forma

SELECT TOP 1 CarParkPlaceNumber FROM CarParkPlacesNoAvariables ORDER BY CarParkPlaceNumber ASC"

Un saludo
Victoria