Hola!!!
tengo un gran problema!
estoy llevando a cabo un programa de control de lavado
mi problema radica en la generación del reporte, uso el datareport
conectada a un dataenviroment
este es parte del código que uso:


Fecha_inicial = rprtcircuito.Sections("detalles").Controls("txtCor tinas").Datafield
fecha_final = Date
rprtcircuito.Sections("detalles").Controls("crtns" ).Caption = Format(DateDiff("d", Fecha_inicial, fecha_final), Formato) & " dias"
b = Val(rprtcircuito.Sections("detalles").Controls("cr tns").Caption)
If b >= 0 And b <= 39 Then
rprtcircuito.Sections("detalles").Controls("crtns" ).ForeColor = &HC000&
ElseIf b >= 40 And b <= 59 Then
rprtcircuito.Sections("detalles").Controls("crtns" ).ForeColor = &HC0C0&
ElseIf b >= 60 Then
rprtcircuito.Sections("detalles").Controls("crtns" ).ForeColor = &HC0&
End If

el error aparece en la línea:

"rprtcircuito.Sections("detalles").Controls("c rtns ").Caption = Format(DateDiff("d", Fecha_inicial, fecha_final), Formato) & " dias"

me indica que los tipos no coinciden.
la verdad no se que hacer, me urge resolver este codigo
ya que de no ser así, tendría que codificar los registros uno x uno
y son + de 450
AYUDA POR FAVOR

Hola el control asi se llama "c rtns " con el espacion " "?

otra puede ser q intentas poner un dato tipo fecha en una campo tipo moneda por ejemplo ya verificaste los formatos asignados a los controles???