VB - Put the desktops background as forms background

[Nightwalker83]

Private Declare Function PaintDesktop Lib "USER32" (ByVal HDC As Long) As Long
 
Private Sub Command1_Click()
 PaintDesktop Me.HDC
End Sub