La Web del Programador: Comunidad de Programadores
 
    Pregunta:  2125 - CAPTURAR IMAGEN COMPLETA DE LA PANTALLA
Autor:  Rodrigo López
Como puedo capturar la imagen completa de la pantalla (escritorio, venranas, barra de tareas... todo)?
Hay alguna función del Visual Basic o tal vez una DLL?

  Respuesta:  Juan Fco. J. L.
He encontrado la formde acerlo usando API´s. Como usa modulos y eso si alguien quiere el proyecto se lo paso por email sin ningun problema.

  Respuesta:  J. 3duardo Nuño Solís
Podemos simular la pulsación de "Impr.Pant" (copiar la pantalla en el portapapeles) o de "Ctrl"+"Impr.Pant" (copiar la ventana activa al portapapeles) mediante la función del API keybd_event, que simula pulsaciones de teclas.

Declaramos la función :

Private Declare Sub keybd_event Lib "user32" (ByVal bVk As Byte, ByVal bScan As Byte, ByVal dwFlags As Long, ByVal dwExtraInfo As Long)

Para capturar toda la pantalla : keybd_event vbKeySnapshot, 1, 0&, 0&
Para capturar la ventana activa : keybd_event vbKeySnapshot, 0, 0&, 0&