DoCmd.Hourglass

Display an hourglass (busy mouse pointer).

Syntax
      DoCmd.Hourglass True

      DoCmd.Hourglass False

True (–1) will display the hourglass icon.
False (0) will display the normal mouse pointer.

Examples

' Open the Patients form minimized.
Application.Echo False
DoCmd.Hourglass True

DoCmd.OpenForm "frmPatients", acNormal
DoCmd.Minimize

Application.Echo True
DoCmd.Hourglass False

“The only thing that helps me pass the time away; is knowing I’ll be back at Echo Beach some day” ~ Martha and the Muffins

Related

Echo - Turn screen updating on or off.