Select com palavra

Galera,

preciso de um help com um código, fiz um select top que funciona muito bem na seguinte condição:

Dim varTop
varTop = strSelectTop
rsTypes.Source = "SELECT top "& varTop &" , (SELECT COUNT() FROM PICTURES WHERE PIC_TYPE = TYPE_ID ) AS PIC_COUNT FROM TYPES ORDER BY TYPE_ID DESC"

Preciso ao invés da ordenação pelo campo "TYPE_ID" que ele pegue o campo TYPE_DESCRIPTION e ordene 10 imagens com a palavra "Jogo de quinta"

Eu tentei desta forma:

Dim varTop
varTop = strSelectTop
rsTypes.Source = "SELECT top "& varTop &" , (SELECT COUNT() FROM PICTURES WHERE PIC_TYPE = TYPE_ID ) AS PIC_COUNT FROM TYPES ORDER BY TYPE_DESCRIPTION = Jogo de quinta DESC"
Mas não deu certo.

Me ajuda? Não achei uma luz