Public Declare Function LockWindowUpdate Lib "user32" (ByVal hWndLock As Long) As Long
hWndLock - указатель окна (контрол, форма, приложение, десктоп)
'Выключаем, Off
LockWindowUpdate Me.hWnd
'ваш мельтешащий код :-)
'Включаем, On
LockWindowUpdate 0&