FreeVBCode code snippet: Replacement for VBs IsDate