Visual Basic - Captura del escritorio

Hola compañeros del foro, necesito capturar el escritorio de Windows y colocarlo en un PictureBox, alguien de ustedes sabe como hacerlo ???

Hola.
Aqui un ejemplo
====================================================================
Private Declare Sub keybd_event Lib "user32" (ByVal bVk As Byte, ByVal bScan As Byte, ByVal dwFlags As Long, ByVal dwExtraInfo As Long)
Private Const KEYEVENTF_KEYUP = &H2
Private Const VK_SNAPSHOT = &H2C

Private Sub Command1_Click()
DoEvents
keybd_event VK_SNAPSHOT, 0, 0, 0
keybd_event VK_SNAPSHOT, 0, KEYEVENTF_KEYUP, 0
DoEvents
SavePicture Clipboard.GetData(vbCFBitmap), "C:\escri.bmp"
Picture1.Picture = LoadPicture("C:\escri.bmp")
End Sub
=====================================================================
Espero te sea util.
Saludoss

El ejemplo funcionó perfectamente, eso era lo que necesitaba.

Gracias Juan_K