>How can this ever be true?
>
IF TYPE('this.ControlSource') = "C" AND TYPE(this.ControlSource) = "T">
I think You missed the single quotes in the first expression, or the lack of them in the second. It will be true if this.ControlSource is a character expression that evaluates to a DateTime type.
"The five senses obstruct or deform the apprehension of reality."
Jorge L. Borges?
"Premature optimization is the root of all evil in programming."
Donald Knuth, repeating C. A. R. Hoare
"To die for a religion is easier than to live it absolutely"
Jorge L. Borges