Screenshot erstellen mit VB.NET Das Erstellen eines Screenshots unter VB.NET ist mit nur wenigen Zeilen Code erledigt.
Autor:  Dieter Otter	Bewertung:	Views:  2.136
http://www.tools4vb.de/	System:  WinNT, Win2k, WinXP, Win7, Win8, Win10, Win11	Beispielprojekt

Das Erstellen eines Screenshots unter VB.NET ist mit nur wenigen Zeilen Code erledigt.

Nachfolgendes Beispiel zeigt, wie man einen Screenshot erstellt und diesen:

• in einer PictureBox anzeigt
• in die Zwischenablage zur Weiterverarbeitung kopiert
• als JPG-Datei speichert

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

Copyright ©2000-2024 vb@rchiv Dieter OtterAlle Rechte vorbehalten.

Microsoft, Windows und Visual Basic sind entweder eingetragene Marken oder Marken der Microsoft Corporation in den USA und/oder anderen Ländern. Weitere auf dieser Homepage aufgeführten Produkt- und Firmennamen können geschützte Marken ihrer jeweiligen Inhaber sein.