DoCmd.Hourglass (Access)

O método Hourglass executa a ação ampulheta no Visual Basic.

Use o método Hourglass para alterar o ponteiro do mouse para uma imagem de ampulheta (ou outro ícone escolhido) enquanto um procedimento está em execução. Esse método pode fornecer uma indicação visual desse procedimento. Isso é especialmente útil quando um procedimento demorar muito para ser executado. Você usa este método com frequência se desligou o eco usando o método Echo. Quando o eco está desativado, o Microsoft Access suspende as atualizações da tela até que a macro seja finalizada. O Access redefine automaticamente o argumento ampulheta como false quando o procedimento termina a ser executado.

Hourglass (HourglassOn)

HourglassOn: Use true (1) para exibir o ícone de ampulheta (ou outro ícone escolhido). Utilize False (0) para exibir o ponteiro normal do mouse.

DoCmd.Hourglass HourglassOn:=True