vb@rchiv
VB Classic
VB.NET
ADO.NET
VBA
C#
SEPA-Dateien erstellen inkl. IBAN-, BLZ-/Kontonummernprüfung  
 vb@rchiv Quick-Search: Suche startenErweiterte Suche starten   Impressum  | Datenschutz  | vb@rchiv CD Vol.6  | Shop Copyright ©2000-2024
 
zurück
Rubrik:    |   VB-Versionen: VB.NET01.10.07
Screenshot erstellen mit VB.NET

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

Autor:  Dieter OtterBewertung:     [ Jetzt bewerten ]Views:  2.098 
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