[Resolvido]Determinar tempo que uma função ou procedimento levou para ser executado

Olá a todos.

Gostaria de saber como calcular o tempo que uma função ou procedimento leva para ser executado.

Gostaria de realizar esse tipo de teste para determinar entre opções que tenho, determinando, assim, a mais rápida.

Grato.

Boa noite, rgondim

Procure primeiro no fórum. Já se falou várias vezes. Existe uma função do Mestre Críquio

Olá Alexandre.

Verifiquei no fórum e infelizmente não encontrei nada relacionada a minha dúvida.
Onde posso encontrar essa função do Criquio?

Encontra aqui, no fórum
http://maximoaccess.forumeiros.com/t2223-resolvidoesperar-x-tempo-antes-de-iniciar-proxima-accao?highlight=tempo

Grande Alexandre, muito obrigado pelo retorno.

Infelizmente a função não contempla minha dúvida.

Eu gostaria de usar alguma função ou procedimento para testar o tempo que algumas funções DLookup e um OpenRecordset(SELECT) demoram para completar sua execução. Dessa forma, pretendo comparar e determinar qual a mais rápida.

Grato.

Não estava a entender
Crie uma variável que assuma a hora antes da execução
Depois da execução, calcule a diferença entre a hora actualizada e a hora guardada e obtém o tempo que demorou

Confesso que quase não tenho ideia de como proceder para criar essa função.

Poderias me indicar o caminho?

rgondim,

Ninguém nasce ensinado. Aprenda, mesmo aqui no fórum, com os temas que forem abordados.
Ainda hoje vi uma divulgação de ensinamentos de Excel e Access. Viu? Procure e estude.

Dim DataHora as date

datahora=now()
...
Msgbox "O código demorou " & Now()-DataHora & " a executar."

Ok Alexandre.

O resultado é sempre zero. Seria porque a execução está a ocorrer em menos de 1 segundo?

Bom dia, rgondim

Não sei, mas poderá ser.

Mestre,

obrigado pela ajuda.