Visual Basic - CONSULTA PARAMETRIZADA CON SQL CON DAO

HE REALIZADO UNA CONSULTA PARAMETRIZADA CON UN QUERYDEF EN SQL. PERO NO ME DEJA INTRODUCIR PARAMETROS EN LA SENTENCIA SQL \\\"ORDER BY [CAMPO]\\\" . SOLO FUNCIONA LA SENTENCIA SI EL CAMPO LO DEFINO EN AL SENTENCIA. ¿como puedo ponerlo como parametro seleccionable por el usuario?.
gracias.

Si es numerico.
Cad ="Select * from Datos Order by [Codigo] = " & VarA

Si es Texto
Cad = "Select * from Datos Order by [Codigo] = ' " & VarA & "' "

Saludos