''' <summary>
''' Acquires images from WIA device and saves images to a PDF file.
''' </summary>
Public Sub AcquireImagesFromWiaDeviceAndSaveImagesToPdfFile()
    ' create WIA device manager
    Using deviceManager As New Vintasoft.WiaImageScanning.WiaDeviceManager()
        ' open WIA device manager
        deviceManager.Open()

        ' get count of WIA devices
        Dim deviceCount As Integer = deviceManager.Devices.Count
        If deviceCount = 0 Then
            System.Console.WriteLine("Devices are not found.")
            Return
        End If

        ' select the first WIA device
        Dim device As Vintasoft.WiaImageScanning.WiaDevice = deviceManager.Devices(0)

        ' open WIA device
        device.Open()

        Dim acquiredImage As Vintasoft.WiaImageScanning.WiaAcquiredImage = Nothing
        Do
            Try
                ' acquire image from WIA device
                acquiredImage = device.AcquireImageSync()
                ' if image is received
                If acquiredImage IsNot Nothing Then
                    System.Console.WriteLine("Image is acquired.")

                    ' create TIFF encoder settings
                    Dim pdfEncoderSettings As New Vintasoft.WiaImageScanning.ImageEncoders.WiaPdfEncoderSettings()
                    ' specify that image must be added to a PDF file
                    pdfEncoderSettings.PdfMultiPage = True
                    ' specify image must be compressed with ZIP compression
                    pdfEncoderSettings.PdfImageCompression = Vintasoft.WiaImageScanning.ImageEncoders.WiaPdfImageCompression.ZIP

                    ' process acquired image
                    acquiredImage.Save("test.pdf", pdfEncoderSettings)
                Else
                    ' if image is not received
                    System.Console.WriteLine("Scan is completed.")
                    Exit Try
                End If
            Catch ex As System.Exception
                System.Console.WriteLine(String.Format("Scan is failed: {0}", ex.Message))
                Exit Try
            End Try
            ' while image is acquired
        Loop While acquiredImage IsNot Nothing

        ' close WIA device
        device.Close()

        ' close WIA device manager
        deviceManager.Close()
    End Using

    System.Console.ReadLine()
End Sub

/// <summary>
/// Acquires images from WIA device and saves images to a PDF file.
/// </summary>
public void AcquireImagesFromWiaDeviceAndSaveImagesToPdfFile()
{
    // create WIA device manager
    using (Vintasoft.WiaImageScanning.WiaDeviceManager deviceManager = new Vintasoft.WiaImageScanning.WiaDeviceManager())
    {
        // open WIA device manager
        deviceManager.Open();

        // get count of WIA devices
        int deviceCount = deviceManager.Devices.Count;
        if (deviceCount == 0)
        {
            System.Console.WriteLine("Devices are not found.");
            return;
        }

        // select the first WIA device
        Vintasoft.WiaImageScanning.WiaDevice device = deviceManager.Devices[0];

        // open WIA device
        device.Open();

        Vintasoft.WiaImageScanning.WiaAcquiredImage acquiredImage = null;
        do
        {
            try
            {
                // acquire image from WIA device
                acquiredImage = device.AcquireImageSync();
                // if image is received
                if (acquiredImage != null)
                {
                    System.Console.WriteLine("Image is acquired.");

                    // create TIFF encoder settings
                    Vintasoft.WiaImageScanning.ImageEncoders.WiaPdfEncoderSettings pdfEncoderSettings =
                        new Vintasoft.WiaImageScanning.ImageEncoders.WiaPdfEncoderSettings();
                    // specify that image must be added to a PDF file
                    pdfEncoderSettings.PdfMultiPage = true;
                    // specify image must be compressed with ZIP compression
                    pdfEncoderSettings.PdfImageCompression = Vintasoft.WiaImageScanning.ImageEncoders.WiaPdfImageCompression.ZIP;

                    // process acquired image
                    acquiredImage.Save("test.pdf", pdfEncoderSettings);
                }
                // if image is not received
                else
                {
                    System.Console.WriteLine("Scan is completed.");
                    break;
                }
            }
            catch (System.Exception ex)
            {
                System.Console.WriteLine(string.Format("Scan is failed: {0}", ex.Message));
                break;
            }
        }
        // while image is acquired
        while (acquiredImage != null);

        // close WIA device
        device.Close();

        // close WIA device manager
        deviceManager.Close();
    }

    System.Console.ReadLine();
}