If Text1.Text > Text2.Text Then
MsgBox "A primeira data é maior", vbInformation
Else
If Text1.Text = Text2.Text Then
MsgBox "As datas são iguais", vbInformation
Else
MsgBox "A segunda data é maior!", vbInformation
End If
End If
Vc não disse o motivo pq não funciona, por isso eu coloquei dessa forma.
Não é aconselhavel utilizar profissionalemente dessa forma.
É interessante formatar a data, colocar apenas em um formato.
Se vc disser o erro talvez seja mais facil de ajudar! ok!!?
Até mais!!