Visual Basic - problema con el formato de fecha dd/mm/aaaa

Hola amigos, mi problema es el siguiente: yo quiero obligar al usuario a ingresar este tipo de fecha dd/mm/aaaa, mi problema es que le coloco mascara pero si el usuario coloca un año por ejemplo 04 en vez de 2004 igual se lo deja pasar y se me cae el programa. no se que hacer y no puedo referenciar este año y colocar que lo aborte si el año es menor al año actual pq en mi programa debe permitir ingresar compras de años anteriores..ayuda porfavor a indentificar si el año ingresado tiene menos de 4 digitos..muchas gracias de antemano

Con la propiedad Text, obtienes la fecha y con la funcion "LEN" obtienes el tamaño del campo. Tambien puedes identificar el año con la funcion "Right", con la que tomas parte de la cadena por la derecha.
Anio = right ( text1.text,4)

Muchisimas gracias me sacaste un problemon de encima, si bien igual me causaba error porque al no tener 4 digitos con el right igual se me caia, vi el numero de error y era el 13, hice un control error y todo bien..ahora obligo a colocar 4 digitos..muchas gracias.