I am not sure if this will solve your problems, but I would assign Today = Date, not Now. Date is an integer for today, Now is a decimal. The way your code is written I believe Today would always be > txbDate.value, unless that value is tomorrow or later. Also, if txbDate is a text box, you may want to go CDate(txbDate.value) to turn the string into a date value.

Does that help?