Imports System.IO
Imports iTextSharp.text
Imports iTextSharp.text.pdf
Public Class Form1
    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        Dim pdf As New PdfReader("C:/1.pdf")
        Dim N As Int16
        Try
            Dim numberOfPages As Integer = pdf.NumberOfPages
            Dim pageNumber As Integer = 1
            While pageNumber <= numberOfPages
                Dim pg As PdfDictionary = pdf.GetPageN(pageNumber)
                Dim img As System.Drawing.Image = GetImage(pg, pdf)
                If img I