LockWindowUpdate 和GetDesktopWindow 一般配对使用,作用跟我们熟识的 DoCmd.Echo False和 DoCmd.Echo True有点相似,功能更为强大,在调用前,必须作如下的声明:
'锁定指定窗口,禁止它更新。同时只能有一个窗口处于锁定状态
Private Declare Function LockWindowUpdate Lib "user32" (ByVal hwndLock As Long) As Long
' 获得代表整个屏幕的一个窗口(桌面窗口)句柄
Private Declare Function GetDesktopWindow Lib "user32" () As Long
'锁定屏幕暂停刷新
LockWindowUpdate GetDesktopWindow
'这里是你认为不想显示的代码语句
.............
'恢复屏幕刷新
LockWindowUpdate False