SoloCodigo

Hola,

Estoy realizando un sistema y soy nuevo en programacion necesito que alguien me ayude con este error

Error a date-time is required here

el codigo en visual es
    Screen.MousePointer = 11
   
    MDISIE.objRPT.ReportFileName = "C:\SII\Report\Cuadre_Diario_Manuales.rpt"
    MDISIE.objRPT.DataFiles(0) = "C:\SII\BD\intu.mdb"
(txtfecha))
    MDISIE.objRPT.ReplaceSelectionFormula ("{Reg_Manuales.Fecha}=" & Trim(txtfecha.Text))
    MDISIE.objRPT.Destination = crptToWindow
    MDISIE.objRPT.Action = 1
   
    Screen.MousePointer = 0

y en Crystal es

{Reg_Manuales.Fecha} =CurrentDate

Gracias.