UserForm Change of data value event- Label show or hide

Hi all,
I have userform and it works fine.
It also can edit as well ( Finally)..
When I open userform and populate existing data :
-Textbox14 has a date value
-I have attached a Label13 ' Date?' and has red colour text.

Now I am trying that the date value in textbox14 is less than today() then Label13 is visible
Otherwise it is not visible.

Just cant get it work.
Please help
Kind regards

Private Sub TextBox14_change()
    If TextBox14.Value < Today() Then
            Me.Label13.Visible = True
         Else
         Me.Label13.Visible = False
        End If
    End If
End Sub

Hi AlphaFrog,
Very well done .
I just played around with code.
It worked as follows:

Private Sub TextBox14_change()
   If IsDate(TextBox14.Value) Then Me.Label13.Visible = (CDate(TextBox14.Value) > Date)
End Sub

Thank you very much
Kind Regards