如何在vb中刷新桌面？

Question

如题！！

Answer 1

http://search.csdn.net/Expert/topic/934/934662.xml?temp=.9498102
http://search.csdn.net/Expert/topic/1370/1370804.xml?temp=.7439386

Answer 2

用GetDesktopWindow吧？
Private Declare Function GetDesktopWindow Lib "user32.dll" () As Long

Answer 3

Private Declare Function RedrawWindow Lib "user32.dll" (ByVal hwnd As Long, ByRef lprcUpdate As RECT, ByVal hrgnUpdate As Long, ByVal fuRedraw As Long) As Long

Answer 4

Option ExplicitPrivate Declare Function UpdateWindow Lib "user32.dll" (ByVal hwnd As Long) As Long
Private Declare Function GetDesktopWindow Lib "user32.dll" () As LongPrivate Sub Command1_Click()
    Dim ret As Long
    ret = UpdateWindow(GetDesktopWindow)
End Sub