Visual Basic para Aplicaciones - Pasar 28/05/02 a 280502

Hola. Tengo un campo en un formulario en formato dd/mm/aa y en un primer momento lo utilizo con este formato para guardarlo en un campo de la tabla. Pero luego necesito guardarlo en otro campo sin formato fecha es decir de 28/05/02 a 280502

puedes hacer esto
a = Format(Date, "dd/mm/yy")
b = Mid(a, 1, 2) & Mid(a, 4, 2) & Mid(a, 7, 2)
Chau