[VB.NET]iTextSharp impostare il formato

[x69asterix]

stò utilizzando la dll di iTextSharp, per quanto riguarda l'esportazione nessun problema, l'unico problema è dettato dal fatto che non riesco ad impostare il formato della pagina correttamente, il codice è questo, se imposto ad a4 l'immagine non viene inserita tutta, cosa invece che se imposto ad a2 l'immaggine è corretta.

    Dim documento As Document = New Document(iTextSharp.text.PageSize.A2, 0, 0, 0, 0)
        PdfWriter.GetInstance(documento, New FileStream(Application.StartupPath + "\2.pdf", FileMode.Create))
        documento.Open()
        Dim logo As iTextSharp.text.Image = iTextSharp.text.Image.GetInstance("C:\...\2.bmp")
        Dim logo1 As iTextSharp.text.Image = iTextSharp.text.Image.GetInstance("C:\...\0_2.jpg")
        documento.Add(logo)
        documento.Add(logo1)
        documento.Close()

[x69asterix]

forse così ci sono:

   Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click

        Dim documento As Document = New Document(iTextSharp.text.PageSize.A4)
        PdfWriter.GetInstance(documento, New FileStream(Application.StartupPath + "\2.pdf", FileMode.Create))
        documento.AddTitle("Protocollo")
        documento.AddAuthor("io")
        documento.Open()

        For Each file As String In Directory.GetFiles(Application.StartupPath & "\2\")
            Dim img As iTextSharp.text.Image = iTextSharp.text.Image.GetInstance(file)
            img.ScalePercent(50) 
            documento.Add(img)
        Next
        documento.Close()
    End Sub