Consulta en Acces

[avilware]

...Hola companieros tengo una tabla con un campo de tipo "TEXT" llamado PROGRAMA el cual contiene valores como...

PROGRAMA
=========
5370 SACSA
5470 IN HOUSE
5370SACSA
5370 SACSA / 5470 IN HOUSE
5470 IN HOUSE
5372 BUS
5370 SACSA

...Como ven hay algunos problemas con los registros, se supone que solo deberia de haber valores de 4 numeros (el codigo del programa) seguidos de un nombre (nombre del programa), y necesito que mi consulta me retorne los registros que inicien con los mismos 4 primeros caracteres, es decir que si quiero contar los registros del codigo 5370 me retorne "4" que no le importe lo que va despues de los primeros 4 caracteres, hay alguna funcion que me tome solo los 4 primeros caracteres para hacer comparaciones?...De antemano MUCHAS GRACIAS!

...Avilware

[BrujoNic]

Código:

SELECT COUNT(*) FROM tabla
WHERE MID(programa,1,4) = '5370'

Importante y NO me voy a cansar de escribirlo... Internet es una gran enciclopedia donde casi podes encontrar de todo.
MID ACCESS. También está la ayuda en línea de access.

Una observación... Tener guardado en un solo campo el código y descripción es un gran desperdicio, existe duplicidad de datos y el concepto de BD relacionales es eliminar lo más que se pueda la duplicidad de datos.