FreeVBCode code snippet: Complete Year Ctrl