VBA To Verify Date Entered Not Working?

I worked out the code below. I supposed to check the date entered in the text box, if that date is greater than the date in cell A2, is supposed to pop up a message box, but is only half working.

For example if I enter 3/1/2013, the code works, but if I enter 1/1/2014 it will not work, it thinks the date is OK and goes on to to the Else statement. In other words, is only looking at the first part (month and day) of my date and ignoring the fact that the year is in the future.

VB:
Dim frmDate As String
Dim toDate As String
Set ws = Sheets("Dashboard")
frmDate = frmEnterDate.txtReportEffectiveDate.Value
toDate = frmEnterDate.txtReportEffectiveLastDay.Value

[Code].....