ByteScout PDF SDK – VB.NET – Reorder Pages

ByteScout PDF SDK – VB.NET – Reorder Pages

Program.vb

Imports Bytescout.PDF

Module Program

    Sub Main()

        Try
            Dim doc As Document = New Document
            doc.Load("sample.pdf")

            ' Swap first and second pages:
            Dim tmp As Page = doc.Pages(1)
            doc.Pages.Remove(1)
            doc.Pages.Insert(0, tmp)

            'Save output file
            doc.Save("result.pdf")

            'Open output file
            Process.Start("result.pdf")

        Catch ex As Exception
            Console.WriteLine(ex.Message)
        End Try

        Console.WriteLine("Press any key to exit...")
        Console.ReadLine()

    End Sub

End Module

  Click here to get your Free Trial version of the SDK