Private Declare Function PaintDesktop Lib "user32" _ (ByVal hdc As Long) As Long
Private Sub Command1_Click() PaintDesktop Form1.hdc End Sub