Proba sin el
%, algo asi:
Código:
Set tabla2 = base.OpenRecordset("SELECT COUNT(respuestas) as totalA FROM control WHERE respuestas LIKE 'A" & i & "' AND cod_prueba='" & txtCod.Text & "'")
Recorda que el
% sustituye a cualquier cosa o nada dentro de una cadena, es decir que si tenes por ejemplo: 'A20' y el criterio de seleccion es 'A2
%' la consulta va ignorar todo lo que sigue despues del 2 y el SQL te seleccionara todos los registros que inicien con 'A2' osea que si tenes 'A20', 'A200', 'A21', 'A2000', el SQL incluira estos registros en tu seleccion, asi que si no usas el
%, el SQL seleccionara unicamente los registros que contengan: 'A2'.
Espero te sirva

Saludos