Noturno realmente para data com um só digito estava ocorrendo um erro mas me lembrei de uma dica aqui no site e fiz assim

observe o formato da data mm/dd/yyyy

 

    mskEntreAntes = Format$(Date, "mm/dd/yyyy")
    mskEntreDepois = Format$(Date, "mm/dd/yyyy")
e antes de iniciar a consulta mando limpar grade

Noturno:

acabei de enviar uma modificação que realmente funciona, no Windows em portugues hoje estarei testando o mesmo  no Windows 2000 em Ingles porque com esta no troca arquivos ele funcionava bem no 2000 mas na minha casa no XP em portugues realmente tive os problemas que vc relatou agora acho que vc pode encerrar este post!!!!!

Desculpe minha burrice....

Mas coloque no form_load do frmRelatorio (Relatório Avançado):

    mskDia.Text = Format$(Date, "mm/dd/yyyy")

...sendo que mskDia é o maskedbox usado para ver somente as presença de uma data.

 

e no command "cmdVisualizar" (este é o botão que tem o codigo que exibe na grade) eu coloquei na 1ª linha:

    LimpaGrade Grade    (esta rotina limpa a grade)

 

E mesmo assim não deu!

 

Aquele projeto que você enviou no meu e-mail, está exatamente igual ao anterior, ou seja, será se você não confundiu na hora do envio e enviou o mesmo! pois ele não tem nenhuma modificação do que está na sessão "TROCA ARQUIVOS"..

 

Você tem me dado uma ajuda enorme!!! queria que todos aqui fossem assim tambem... parabéns!

 

Já corrigi meu erro... mudei para NightCrawler meu nick e meu e-mail agora é kurt.wagner@terra.com.br