Fazer Print Screen

Boas

Gostaria que alguem me podesse ajudar a resolver este problema, é que ja tenho o codigo que esta a baixo, e funciona bem, mas so faz o print screen á janela activa, e eu queria fazer a toda a tela.

Alguem me pode ajudar??????

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click GetWindowCapture().Save("c:\Teste.bmp") End Sub Public Function GetWindowCapture() As Image SendKeys.SendWait("%{PRTSC}") Dim objClipboard As IDataObject = Clipboard.GetDataObject() Return objClipboard.GetData(DataFormats.Bitmap) End Function

Neste exemplo ele envia o ALT + PRINT SCREEN, o que faz com que grave so a janela activa, e o que eu queria era o mesmo que um CRTL + PRINT SCREEN, para poder capturar uma imagem de toda a TELA.

Desde Já Agradeço

SLIFE®