Pues tienes muchas formas...
Código:
'Date Literal
hora = #00:00:00#
'Una variable Date es exactamente igual en memoria que una
'variable de tipo double donde la parte entera representa la
'fecha y la parte decimal representa la hora.
'Por lo tanto lo que sigue es válido:
hora = CDate(0.0)
'Puedes usar la función TimeSerial:
hora = TimeSerial(0, 0, 0)
Saludos.