当过程完成运行时，Access 会自动将 HourglassOn 参数重置为 False 。

若要确定沙漏的当前状态，可以检查 Screen.MousePointer 的值。 如果 Screen.MousePointer = 11 为 ，则当前正在显示沙漏。

支持和反馈

有关于 Office VBA 或本文档的疑问或反馈？ 请参阅 Office VBA 支持和反馈 ，获取有关如何接收支持和提供反馈的指南。