ник: Силыч
Private Declare Function GetDesktopWindow Lib "user32" () As Long
Public Declare Function UpdateWindow Lib "user32" (ByVal hwnd As Long) As Long
в коде:
ret=UpdateWindow(GetDesktopWindow)
или
Public Declare Function RedrawWindow Lib "user32" (ByVal hwnd As Long, lprcUpdate As Any, ByVal hrgnUpdate As Long, ByVal fuRedraw As Long) As Long
Const RDW_INVALIDATE = &H1
в коде:
RedrawWindow GetDesktopWindow, ByVal 0&, ByVal 0&, RDW_INVALIDATE
а может и так пройдет
RedrawWindow ByVal 0&, ByVal 0&, ByVal 0&, RDW_INVALIDATE