Feedback

VB - Screenshot

Veröffentlicht von am 23.12.2006
(5 Bewertungen)
Muss man aus der Anwendung heraus einen Screenshot erstellen, kann dieser Code das erledigen.
GFU-Schulungen  [Anzeige]

XML und .NET Überblick

Um auf dem neuesten Wissensstand zu sein, sollten Sie unser aktuelles ASP .NET Komplett Seminar belegen.
Nach dem Seminar kennen Sie die wichtigsten Strömungen in der Software-Technologie

VB.NET Komplett

Sie stehen vo der Aufgabe, individuelle Anwendungen für Windows zu schreiben. Hier ist VB.NET die optimale Sprache. Sie erlernt sich recht leicht und passt sich komplett in die .NET Umgebung von Microsoft ein. Nach der Schulung entwickeln Sie anwenderfreundliche Programme in VB.NET . Mit den objektorientierten Modellen in VB.NET erzeugen Sie außerdem wiederverwendbare Komponenten.

  ''' <summary>
    ''' Ermittelt die aktuelle Bildschirmgroesse
    ''' 
    ''' Unter Location wird der Speicherort des Screenshots angegeben
    ''' incl. des Dateinamens angegeben
    ''' 
    ''' </summary>
    ''' <param name="Location"></param>
    ''' <returns></returns>
    ''' <remarks></remarks>

    Function ScreenToPicture(ByVal Location As String) As String

        Try
            Dim currentScreenSize As Size = New Size(My.Computer.Screen.Bounds.Width, My.Computer.Screen.Bounds.Height)
            Dim ScreenToBitmap As New Bitmap(My.Computer.Screen.Bounds.Width, My.Computer.Screen.Bounds.Height)
            Dim gGraphics As System.Drawing.Graphics = System.Drawing.Graphics.FromImage(ScreenToBitmap)

            gGraphics.CopyFromScreen(New Point(0, 0), New Point(0, 0), currentScreenSize)
            ScreenToBitmap.Save(Location)

            Return Location

        Catch ex As Exception
            Return ex.Message
        End Try

    End Function
Abgelegt unter Screnshot.

Kommentare zum Snippet

 

Logge dich ein, um hier zu kommentieren!