Das Erstellen eines Screenshots unter VB.NET ist mit nur wenigen Zeilen Code erledigt. Nachfolgendes Beispiel zeigt, wie man einen Screenshot erstellt und diesen:
Für das Erstellen des Screenshot wird ein Bitmap-Objekt mit der Größe des Screens erstellt. Anschließend erzeugen wir ein Graphics-Objekt und kopieren den aktuellen Inhalt des Screens in das Bitmap-Objekt. ' Größe des Screens Dim oRect As Rectangle = My.Computer.Screen.Bounds ' 24-Bit Bitmap-Objekt mit der ermittelten Größe erstellen With oRect Dim oBitmap As New Bitmap(.Width, .Height, Imaging.PixelFormat.Format24bppRgb) End With ' Screenshot erstellen und in Bitmap-Objekt "ablegen" Using g As Graphics = Graphics.FromImage(oBitmap) g.CopyFromScreen(0, 0, 0, 0, New Size(oRect.Width, oRect.Height)) ' - Anzeige des Screenshots in einem PictureBox-Control PictureBox1.Image = oBitmap.Clone ' - Screenshot in die Zwischenablage kopieren Clipboard.SetImage(oBitmap.Clone) ' - Screenshot als JPG-Datei speichern oBitmap.Save("d:\temp\screenshot.jpg", Imaging.ImageFormat.Jpeg) End Using ' Bitmap-Objekt freigeben oBitmap.Dispose |