Bom dia, pessoal!

Estou com um problema que acredito que seja fácil de resolver porem não consegui!

If txtDataInicio > txtDataFim Or Not IsDate(txtDataInicio) Or txtDataFim < txtDataInicio Or Not IsDate(txtDataFim) Then _
            MsgBox "Data Inicio não deve ser maior que data Fim!"

Não estou conseguindo fazer esta condição funcionar, se coloco 25/05/2018 da inicio ele fica maior que 15/06/2018 data fim,
como resolver, esta questão?

Atenciosamente,
Isabella