Visual Basic - extraer sólo la fecha de un campo date

tengo una tabla en access en dónde tengo un campo tipo date en el cual quiero grabar únicamente la fecha, quiero decir, que el valor de la variable date es "01/01/2008 1:30:22 pm" y yo lo único que quiero guardar en el campo es 01/01/2009 sin la fecha y tal vez en otro campo grabar únicamente la hora, espero que me puedan ayudar......gracias

Dim TIEMPO As String

TIEMPO = "01/01/2008 1:30:22 pm"

'Con esto separas la fechA
Text1.Text = Format(TIEMPO, "dd/mm/yyyy")

'Con esto separas la hora
Text2.Text2 = Format(TIEMPO, "hh:mm:ss")

muchas gracias por tu ayuda.....salu2

Hola.

A lo mejor esta instrucción podria valerte también:

Dim Fecha As String
Fecha = FormatDateTime(Now, DateFormat.ShortDate)

Un saludo.