Esta son las formas que he utilizado, en las que uso el TimeValue retorna 00:00:00, el que usa Format retorna 00:00 y el resto la fecha 07-04-2010
TimeValue(ODJob.Fields(3).Value)
TimeValue(ODJob.Fields(3))
TimeValue(ODJob.Fields("hasta"))
ODJob.Fields(3)
ODJob.Fields(3).Value
ODJob.Fields("hasta").Value
ODJob!hasta
Format(Validatext(ODJob!hasta), "HH:MM")
El problema no creo que este en el despliegue o donde muestre de la hora, ya que en el debug tambien no muestra, al parecer esta en lo que retorna la SQL en el objeto Recorset.
Código:
Dim ODJob as Recordset
SQL="SELECT hora FROM reunion;"
Set ODJob = OBD.Execute(SQL)
If Not ODJob.EOF Then
Do While Not ODJob.EOF
etc, etc..