Access formato fecha

Crea una tabla con tres campos
Fecha
Numero_semana
Nombre_Semana
Crea una Consulta de esa tabla
crea un formulario de esa consulta
en elevento al salir de el campo fecha
pon:
Private Sub Fecha_Exit(Cancel As Integer)
Me.Dia = Weekday([Fecha])
If Me.Dia = 1 Then
Me.Dia1 = "Lunes"
ElseIf Me.Dia = 2 Then
Me.Dia1 = "Martes"
ElseIf Me.Dia = 3 Then
Me.Dia1 = "Miercoles"
ElseIf Me.Dia = 4 Then
Me.Dia1 = "Juaves"
ElseIf Me.Dia = 5 Then
Me.Dia1 = "Viernes"
ElseIf Me.Dia = 6 Then
Me.Dia1 = "Sabado"
ElseIf Me.Dia = 7 Then
Me.Dia1 = "Domingo"
End If
End Sub
Esto en el campo Numero_semana te pondrá el numero de día de la semana
y en el campo Nombre_Semana te pondrá el nombre del día de la semana
esto lo hará dependiendo de la fecha que tu pongas en el campo fecha

Gracias por tu tiempo. Hice todo como lo escribiste pero me da el siguiente error "error de compilación.No se encontró el método o dato miembro" Este error se genero al cargar el primer registro. ¿Puede ser porque la base esa vacía?. Gracias nuevamente.

El Formulario debe tener tres campos
1-Fecha
2-Numero_Semana
3-Nombre_semana
Sorry el código hace referencia a nombres de campos Día y Dia1
Elabora el Formulario con los nombre tal como te los puse en 1,2 y 3
y en el código sustituye
Día por Numero semana
Y Dia1 por Nombre _semana

Perdón pero ahora me da el siguiente error" no permite un valor null"
Private Sub Fecha_Exit(Cancel As Integer)
Me.Numero_semana = Weekday([Fecha])
If Me.Numero_semana = 1 Then
  Me.Nombre_Semana = "Lunes"
 ElseIf Me.Numero_semana = 2 Then
  Me.Nombre_Semana = "Martes"
 ElseIf Me.Numero_semana = 3 Then
  Me.Nombre_Semana = "Miercoles"
 ElseIf Me.Numero_semana = 4 Then
  Me.Nombre_Semana = "Jueves"
 ElseIf Me.Numero_semana = 5 Then
  Me.Nombre_Semana = "Viernes"
 ElseIf Me.Numero_semana = 6 Then
  Me.Nombre_Semana = "Sabado"
 ElseIf Me.Numero_semana = 7 Then
  Me.Nombre_Semana = "Domingo"
End If
End Sub
El error, en negrita, se dio al colocar la fecha 16/04/2010, coloco el numero 6 en el text "numero semana" y ahí muestra lo que te escribí más arriba. Gracias

Ya lo probé. No me marca ningún error
Verifica que los nombres de los campos sean igual a los que haces referencuia en el código
Fecha
Numero_Semana
Nombre_Semana

Ok, el error era mio porque no definí el campo "nombre semana" como de texto. Una más, como hago para que al cerrar el fomlulario no me de error porque registra un valor nulo. Muchas gracias, es la primera vez que utilizo a los EXPERTOS y me has ayudado mucho.