Hola  quisiera preguntar si alguien sabe hacer lo siguiente:
tengo un formulario normal de access y uno de los campos es Fecha quiero que
en ese campo si la fecha es anterior a la del sistema me la ponga en color
rojo por ejemplo.
Como podria hacer


EDUARDO OLAZ
============

Private Sub Form_Current()
    ColorearFecha
End Sub

Private Sub txtFecha_AfterUpdate()
    ColorearFecha
End Sub

Private Sub ColorearFecha()
    Dim strFecha As String
    strFecha = Nz(txtFecha, "")
    If Trim(strFecha) = "" Or Not IsDate(strFecha) Then
        txtFecha.ForeColor = vbBlack
    ElseIf CDate(strFecha) >= Date Then
        txtFecha.ForeColor = vbBlack
    Else
        txtFecha.ForeColor = vbRed
    End If
End Sub


MARJAN
======

Volviendo a ampliar respuestas...
Solo si tienes el A2000 o posterior...

Vas al Diseño del Formulario, haces clic en el campo Fecha,
vas al Menú Formato - Formato condicional...
En Condición 1 pones en los cuadros :
"El valor del campo es" - "Menor que" y en el último Fecha()
Entonces escoges el color que quieras de fondo y de primer plano...

    Source: geocities.com/es/ensolva/Descargas/Documentos

               ( geocities.com/es/ensolva/Descargas)                   ( geocities.com/es/ensolva)                   ( geocities.com/es)