[Resolvido]validação cores relatório

Boa tarde amigos

criei um relatório que mostra em detalhe marcações de cargas. E ao carregar o relatório coloquei a seguinte validação:

Private Sub Report_Load()
Dim data_da_carga As Date
If data_da_carga = Date Then
Me.data_da_carga.ForeColor = vbBlue
ElseIf data_da_carga < Date Then
Me.data_da_carga.ForeColor = vbRed
ElseIf data_da_carga >Date Then
Me.data_da_carga.ForeColor = vbGreen
End If
End Sub

contudo todas as datas aparecem-me a vermelho :/ já experimentei de varias formas... será que a minha construção está mal feita?
Muito Obrigado
Com os melhores Cumprimentos
Oliveira

assim nao vai dar mesmo não

ja tentou usar formatação condicional na caixa de texto dentro do formulário?

Ainda não fiz ^^ mas como fazer?
obrigado

alguma coisa assim, nao testei (botao direito em cima da caixa de texto, opção formatação condicional)

Amigo MUito Obrigado
Cumprimentos
Oliveira

Agradecemos o retorno.

sds.