Visual Basic - Separar fecha y concatenar

Como se puede hacer que un campo fecha 01/05/2001 se guarde el valor del dia "01" en una variable, el valor del mes "05" en otra y el valor del año "2001" en otra. luego como se puede hacer que el valor del dia 01 se añada al final de una variable string (ej. cadena=pepe el resultado de concatenar tendría que ser pepe01)

Para obtener el dia de una fecha, usa day()

mifecha = "01/05/2001"
dia = day(mfecha)
micadena = "pere" & format(dia,"00")

Para comprobar si una cadena es de tipo fecha :
ISDATE( )