Pues en VbScript existe algo así:
Dia=Day(Date)
Month=Month(date)
Anio=Year(Date)
Supongo que tambien existe en VB, sinceramente no lo recuerdo jeje
Saludos
<center><img src="http://www.pcmasmas.com.ar/foro/images/avatars/043.gif"><br>
Urjose</center>