Visual Basic - Ordenar recordset a traves del uso del count

Hola, a ver si alguien me puede dar una mano. Lo que estoy queriendo hacer es elaborar un ranking con las 10 peliculas mas vistas de un videoclub pero estoy trabado. El recordsource que estoy usando es el siguiente.
Data1.RecordSource = "Select count(*) as total,CodigoPelicula_Alquiler from Alquiler Group by CodigoPelicula_Alquiler order by total desc"
Me tira el error de "Pocos parámetros. Se esperaba 1." cuando ejecuto el codigo. Si alguien me puede decir como solucionarlo o tiene idea de como armar un ranking de mas vistos extrayendo de una base de datos estare muy agradecido, saludos, Pablo.-

Hola, Pablo!!

Veo que la consulta esta bien el error debe ser otro revisa bien.
Solo falto algo para obtener los 10 mas vistas.

Debiste poner de esta manera:

Data1.RecordSource = "Select top 10 count(*) as total,CodigoPelicula_Alquiler from Alquiler Group by CodigoPelicula_Alquiler order by total desc"

Saludos!

PDTA: cualquier otra duda escribeme.

Hola Luis, muchas gracias por la respuesta. El tema del error que no es de ahi, si yo suprimo el order by el error desaparece. Solo aparece cuando hago el order. Si alguien tiene alguna otra ayudita se los agradecere. Saludos, Pablo.-

Hola, Pablo!!

Ya vi cual fue tu error, lo que pasa es que estas trabajando con access y en access cambia la cosa de esta manera.

Data1.RecordSource = "Select top 10 count(*) as total,CodigoPelicula_Alquiler from Alquiler Group by CodigoPelicula_Alquiler order by count(*) desc"

Saludos!!

PDTA: Cualquier otra duda escribeme.