Tenemos------0 1 / 0 2 / 2 0 0 3  y queremos 02/01/2003.
Posiciones---1 2 3 4 5 6 7 8 9 10


Mid significa coger "por el centro", o lo que es lo mismo, coger desde cualquier posicion.
Desde la posicion 4 cogemos 2 datos (4,2)=0 y 2, ya tenemos 02, le añadimos la barra (& "/") y ya tenemos 02/, despues desde la posicion 1 cogemos 2 datos (1,2)=0 y 1, ya tenemos 02/01, le añadimos la segunda barra (& "/") y desde la posicion 7 cogemos 4 datos (7,4)=2003 y ya tenemos la fecha como 02/01/2003.

El final del SQL sería este, utilizando solo MID:
DateSerial(Mid[Fecha1_txt],4,2) & "/" & Mid([Fecha1_txt],1,2) & "/" & Mid([Fecha1_txt],7,4)


Este otro SQL tambien vale, aunque en ocasiones falla por un problema de referencias en algunas instalaciones de Access:
DateSerial(Mid[Fecha1_txt], 4,2) & "/" & left([Fecha1_txt], 2) & "/" & right([Fecha1_txt],4)

Este último Utiliza Mid para coger por el centro, left para coger por la izquierda y right para coger por la derecha.


Es más conveniente que pongamos nosotros las barras en lugar de aprovechar las de las posiciones 3 y 6 por si el formato de fecha en el ordenador del usuario estuviera con guiones 02-01-2003, aunque tambien seria una opcion aprovechar esas barras o guiones. Entonces sería:

DateSerial(Mid[Fecha1_txt],4,3) & Mid([Fecha1_txt],1,3) & Mid([Fecha1_txt],7,4)