Esta função é um aprimoramento função DataValida, tambem desenvolvida por mim, bem mais simples e mais pratica de se utilizar.