C#/VB.NET: 여러 이미지를 단일 PDF로 변환

PM> Install-Package Spire.PDF

using Spire.Pdf;
    using Spire.Pdf.Graphics;
    using System.Drawing;
    
    namespace ConvertMultipleImagesIntoPdf
    {
        class Program
        {
            static void Main(string[] args)
            {
                //Create a PdfDocument object
                PdfDocument doc = new PdfDocument();
    
                //Set the page margins to 0
                doc.PageSettings.SetMargins(0);
    
                //Get the folder where the images are stored
                DirectoryInfo folder = new DirectoryInfo(@"C:\Users\Administrator\Desktop\Images");
    
                //Iterate through the files in the folder
                foreach (FileInfo file in folder.GetFiles())
                {
                    //Load a particular image
                    Image image = Image.FromFile(file.FullName);
    
                    //Get the image width and height
                    float width = image.PhysicalDimension.Width;
                    float height = image.PhysicalDimension.Height;
    
                    //Add a page that has the same size as the image
                    PdfPageBase page = doc.Pages.Add(new SizeF(width, height));
    
                    //Create a PdfImage object based on the image
                    PdfImage pdfImage = PdfImage.FromImage(image);
    
                    //Draw image at (0, 0) of the page
                    page.Canvas.DrawImage(pdfImage, 0, 0, pdfImage.Width, pdfImage.Height);
                }
    
                //Save to file
                doc.SaveToFile("CombinaImagesToPdf.pdf");
                doc.Dispose();
            }
        }
    }

Imports Spire.Pdf
    Imports Spire.Pdf.Graphics
    Imports System.Drawing
    
    Namespace ConvertMultipleImagesIntoPdf
        Class Program
            Shared  Sub Main(ByVal args() As String)
                'Create a PdfDocument object
                Dim doc As PdfDocument =  New PdfDocument()
    
                'Set the page margins to 0
                doc.PageSettings.SetMargins(0)
    
                'Get the folder where the images are stored
                Dim folder As DirectoryInfo =  New DirectoryInfo("C:\Users\Administrator\Desktop\Images")
    
                'Iterate through the files in the folder
                Dim file As FileInfo
                For Each file In folder.GetFiles()
                    'Load a particular image
                    Dim image As Image =  Image.FromFile(file.FullName)
    
                    'Get the image width and height
                    Dim width As single =  image.PhysicalDimension.Width
                    Dim height As single =  image.PhysicalDimension.Height
    
                    'Add a page that has the same size as the image
                    Dim page As PdfPageBase =  doc.Pages.Add(New SizeF(width,height))
    
                    'Create a PdfImage object based on the image
                    Dim pdfImage As PdfImage =  PdfImage.FromImage(image)
    
                    'Draw image at (0, 0) of the page
                    page.Canvas.DrawImage(pdfImage, 0, 0, pdfImage.Width, pdfImage.Height)
                Next
    
                'Save to file
                doc.SaveToFile("CombinaImagesToPdf.pdf")
                doc.Dispose()
            End Sub
        End Class
    End Namespace