Visual Basic 6 - Immagine Schermo - Fotografare Schermo

ciao a tutti per l'ennesima volta vi rifaccio una domanda molto importante per me...
allora...volevo sapere come si fa a fotografare lo schermo con un form non visibile ... ho provato questo metodo :

nel modulo :

Public Declare Sub keybd_event Lib "user32" (ByVal bVk As Byte, ByVal bScan As Byte, ByVal dwFlags As Long, ByVal dwExtraInfo As Long)
Public Const KEYEVENTF_KEYUP = &H2
Public Function ImmagineSchermo(Optional ActiveWindow As Boolean) As Picture
Dim Picture As StdPicture
Set Picture = Clipboard.GetData(vbCFBitmap)
If ActiveWindow Then
keybd_event vbKeyMenu, 0, 0, 0
End If
keybd_event vbKeySnapshot, 0, 0, 0
DoEvents
keybd_event vbKeySnapshot, 0, KEYEVENTF_KEYUP, 0
If ActiveWindow Then
keybd_event vbKeyMenu, 0, KEYEVENTF_KEYUP, 0
End If
Set ImmagineSchermo = Clipboard.GetData(vbCFBitmap)
Clipboard.SetData Picture, vbCFBitmap
End Function

richiama foto :

Set Picture1.Picture = ImmagineSchermo()

sapete dirmi come farla in un altro modo la foto ? mi serve per un R.A.T (remote administration tools)
GRAZIE !

come ho già detto l'altra volta:

per un momento pensavo volessi fare un TOP