Tengo un informe que me muestra los datos de esta forma:
Valor Fecha
A ------- 31/12/2999
B ------- 31/12/2999
C ------- 21/05/2001
¿Cómo podría hacer para que todos los registros cuya fecha sea distinta de
31/12/2999 me los muestre de otro color (rojo p.ej.) para resaltarlos?
Supongo que será fácil. Alguna sugerencia??
REsPONDE EDUARDO OLAZ
=====================
Supongamos que hemos llamado al control de la fecha txtFecha y que la
sección se llama detalle
pon este código para responder al evento format de la sección:
Private Sub Detalle_Format( _
Cancel As Integer, _
FormatCount As Integer)
Dim ctl As Control
If CDate(Nz(txtFecha , 0)) <> #12/31/2999# Then
For Each ctl In Me.Detalle.Controls
ctl.ForeColor = vbRed
Next ctl
Else
If txtFecha.ForeColor = vbRed Then
For Each ctl In Me.Detalle.Controls
ctl.ForeColor = vbBlack
Next ctl
End If
End If
End Sub
               (
geocities.com/es/ensolva/Descargas)                   (
geocities.com/es/ensolva)                   (
geocities.com/es)