VB .NET PDF in PictureBox anzeigen: PDF-Seiten als Bilder in Windows Forms rendern

Darstellung von PDF-Dateien in einem PictureBox-Steuerelement

Die direkte Anzeige von PDF-Dateien in einem PictureBox-Steuerelement ist nicht möglich, da PictureBox nur Bildformate wie BMP, PNG, TIF und JPG unterstützt. Die Lösung besteht darin, PDF-Seiten als Bitmap-Bilder zu rendern und sie dann in Windows Forms-Anwendungen anzuzeigen.

In diesem Tutorial zeigen wir Ihnen, wie Sie PDF-Dokumente mithilfe der leistungsstarken Rasterisierungsfunktionen von IronPDF konvertieren und anzeigen können. Wenn Sie weitere Referenzen benötigen oder Antworten auf nicht abgedeckte Fragen haben, möchte ich darauf hinweisen, dass Sie in der Regel weitere Informationen in der offiziellen IronPDF-Referenz Dokumentation finden können.

Starten Sie jetzt mit IronPDF.

Jetzt kostenlos starten

Warum kann PictureBox PDF-Dateien nicht direkt anzeigen?

Das PictureBox-Steuerelement in Microsoft .NET Framework Windows Forms-Anwendungen ist nur für die Anzeige von Bilddateien vorgesehen. Wenn Entwickler versuchen, ein PDF-Dokument in eine PictureBox zu laden, stoßen sie auf Fehler, weil das PDF-Format ein spezielles Rendering erfordert. Während einige Lösungen die Verwendung von Adobe Reader oder Adobe PDF Reader über COM-Komponenten beinhalten, schafft dieser Ansatz Abhängigkeiten von externer Software wie Adobe Acrobat. Es gibt oft einen anderen Weg, um Programmeinschränkungen zu lösen.

Ein sauberer Ansatz verwendet IronPDF, um jede PDF-Seite als Bitmap-Bild zu rendern. Diese Methode funktioniert in jeder .NET-Anwendung, ohne dass die Benutzer Adobe Acrobat herunterladen oder auf ihren Desktop-Systemen installieren müssen. Der Prozess konvertiert PDF-Seiten in Bildformate, die PictureBox nativ anzeigen kann und die Ausgabe in PNG, TIF und andere Standardformate unterstützt.

Wie richtet man ein Windows-Formularprojekt für einen PDF-Viewer ein?

Erstellen Sie ein neues Windows Forms-Anwendungsprojekt in Visual Studio. Fügen Sie ein PictureBox-Steuerelement aus der Toolbox in das Formular ein, zusammen mit Navigationsschaltflächen zum Durchsuchen von Seiten. Installieren Sie IronPDF über den NuGet Package Manager, indem Sie nach "IronPDF" suchen und auf "Installieren" klicken.

Dieses SDK bietet alle Methoden, die zum Laden, Rendern und Konvertieren von PDF-Dateien in Bilder erforderlich sind.

Das folgende Codebeispiel zeigt die grundlegende Einrichtung eines Formulars mit Steuerelementen für die Anzeige von PDF in der PictureBox-Funktionalität von VB NET:

Imports IronPDF
Imports System.Drawing

Public Class PdfViewerForm
    Private currentPdf As PdfDocument
    Private currentPageIndex As Integer = 0
    Private pageImages() As IronSoftware.Drawing.AnyBitmap

    Private Sub PdfViewerForm_Load(sender As Object, e As EventArgs) Handles MyBase.Load
        ' Form initialization code
        PictureBox1.SizeMode = PictureBoxSizeMode.Zoom
    End Sub
End Class

Imports IronPDF
Imports System.Drawing

Public Class PdfViewerForm
    Private currentPdf As PdfDocument
    Private currentPageIndex As Integer = 0
    Private pageImages() As IronSoftware.Drawing.AnyBitmap

    Private Sub PdfViewerForm_Load(sender As Object, e As EventArgs) Handles MyBase.Load
        ' Form initialization code
        PictureBox1.SizeMode = PictureBoxSizeMode.Zoom
    End Sub
End Class

Wie lädt und zeigt man PDF-Seiten in einer PictureBox an?

Das Laden und Anzeigen von PDF-Dokumenten erfordert die Konvertierung jeder PDF-Seite in eine Bitmap, die PictureBox darstellen kann. Die Methode ToBitmap von IronPDF wickelt diesen Konvertierungsprozess effizient ab und unterstützt verschiedene Bildformate und Qualitätseinstellungen.

Private Sub LoadPdfDocument(filePath As String)
    ' Load the PDF document from file path
    currentPdf = PdfDocument.FromFile(filePath)
    ' Convert all PDF pages to bitmap images
    pageImages = currentPdf.ToBitmap()
    ' Display the first page
    If pageImages IsNot Nothing AndAlso pageImages.Length > 0 Then
        DisplayPage(0)
    End If
End Sub

Private Sub DisplayPage(pageIndex As Integer)
    If pageImages IsNot Nothing AndAlso pageIndex < pageImages.Length Then
        ' Create new Bitmap from the rendered page
        Dim newBitmap As New Bitmap(pageImages(pageIndex).GetStream())
        PictureBox1.Image = newBitmap
        currentPageIndex = pageIndex
        lblPageNumber.Text = $"Page {pageIndex + 1} of {pageImages.Length}"
    End If
End Sub

Private Sub btnOpen_Click(sender As Object, e As EventArgs) Handles btnOpen.Click
    Using openDialog As New OpenFileDialog()
        openDialog.Filter = "PDF Files|*.pdf"
        If openDialog.ShowDialog() = DialogResult.OK Then
            LoadPdfDocument(openDialog.FileName)
        End If
    End Using
End Sub

Private Sub LoadPdfDocument(filePath As String)
    ' Load the PDF document from file path
    currentPdf = PdfDocument.FromFile(filePath)
    ' Convert all PDF pages to bitmap images
    pageImages = currentPdf.ToBitmap()
    ' Display the first page
    If pageImages IsNot Nothing AndAlso pageImages.Length > 0 Then
        DisplayPage(0)
    End If
End Sub

Private Sub DisplayPage(pageIndex As Integer)
    If pageImages IsNot Nothing AndAlso pageIndex < pageImages.Length Then
        ' Create new Bitmap from the rendered page
        Dim newBitmap As New Bitmap(pageImages(pageIndex).GetStream())
        PictureBox1.Image = newBitmap
        currentPageIndex = pageIndex
        lblPageNumber.Text = $"Page {pageIndex + 1} of {pageImages.Length}"
    End If
End Sub

Private Sub btnOpen_Click(sender As Object, e As EventArgs) Handles btnOpen.Click
    Using openDialog As New OpenFileDialog()
        openDialog.Filter = "PDF Files|*.pdf"
        If openDialog.ShowDialog() = DialogResult.OK Then
            LoadPdfDocument(openDialog.FileName)
        End If
    End Using
End Sub

Wie navigiert man zwischen PDF-Seiten?

Die Implementierung einer Seitennavigation ermöglicht es den Benutzern, durch alle Seiten eines PDF-Dokuments zu blättern. Das folgende Codebeispiel demonstriert die Funktionalität der Schaltflächen "Zurück" und "Weiter":

Private Sub btnPrevious_Click(sender As Object, e As EventArgs) Handles btnPrevious.Click
    If currentPageIndex > 0 Then
        DisplayPage(currentPageIndex - 1)
    End If
End Sub

Private Sub btnNext_Click(sender As Object, e As EventArgs) Handles btnNext.Click
    If pageImages IsNot Nothing AndAlso currentPageIndex < pageImages.Length - 1 Then
        DisplayPage(currentPageIndex + 1)
    End If
End Sub

Private Sub btnPrevious_Click(sender As Object, e As EventArgs) Handles btnPrevious.Click
    If currentPageIndex > 0 Then
        DisplayPage(currentPageIndex - 1)
    End If
End Sub

Private Sub btnNext_Click(sender As Object, e As EventArgs) Handles btnNext.Click
    If pageImages IsNot Nothing AndAlso currentPageIndex < pageImages.Length - 1 Then
        DisplayPage(currentPageIndex + 1)
    End If
End Sub

Wie fügt man Funktionen zum Speichern und Drucken von PDF-Dokumenten hinzu?

Viele Windows Forms-Anwendungen müssen PDF-Dokumente drucken oder gerenderte Seiten als Bilddateien speichern. IronPDF unterstützt beide Vorgänge durch seine umfassende API. Die Verwendung dieser Funktion beeinträchtigt weder die Systemsicherheit noch erfordert sie komplexe mathematische Berechnungen für die Druckränder.

Private Sub btnPrint_Click(sender As Object, e As EventArgs) Handles btnPrint.Click
    If currentPdf IsNot Nothing Then
        Dim printDialog As New PrintDialog()
        If printDialog.ShowDialog() = DialogResult.OK Then
            currentPdf.Print()
        End If
    End If
End Sub

Private Sub btnSaveImage_Click(sender As Object, e As EventArgs) Handles btnSave.Click
    If PictureBox1.Image IsNot Nothing Then
        Using saveDialog As New SaveFileDialog()
            saveDialog.Filter = "PNG Image|*.png|JPEG Image|*.jpg|TIF Image|*.tif"
            If saveDialog.ShowDialog() = DialogResult.OK Then
                PictureBox1.Image.Save(saveDialog.FileName)
            End If
        End Using
    End If
End Sub

Private Sub btnPrint_Click(sender As Object, e As EventArgs) Handles btnPrint.Click
    If currentPdf IsNot Nothing Then
        Dim printDialog As New PrintDialog()
        If printDialog.ShowDialog() = DialogResult.OK Then
            currentPdf.Print()
        End If
    End If
End Sub

Private Sub btnSaveImage_Click(sender As Object, e As EventArgs) Handles btnSave.Click
    If PictureBox1.Image IsNot Nothing Then
        Using saveDialog As New SaveFileDialog()
            saveDialog.Filter = "PNG Image|*.png|JPEG Image|*.jpg|TIF Image|*.tif"
            If saveDialog.ShowDialog() = DialogResult.OK Then
                PictureBox1.Image.Save(saveDialog.FileName)
            End If
        End Using
    End If
End Sub

Abschluss

Mit den Bildkonvertierungsfunktionen von IronPDF wird die Erstellung eines PDF-Viewers in VB.NET Windows Forms-Anwendungen zum Kinderspiel. Durch das Rendern von PDF-Seiten als Bitmaps können Entwickler PDF-Dokumente in Standard-PictureBox-Steuerelementen ohne externe Abhängigkeiten anzeigen. Der Ansatz unterstützt die Seitennavigation, die Zoomsteuerung und die Druckfunktionalität für vollständige Lösungen zur Anzeige von Dokumenten.

Starten Sie Ihre kostenlose Testversion, um die PDF-Anzeige in Ihren Windows Forms-Projekten zu implementieren, oder erwerben Sie eine Lizenz für den Produktionseinsatz.