ImageToPdfOptionsJpegQuality Property

public int JpegQuality { get; set; }

Public Property JpegQuality As Integer
	Get
	Set

using System;
using System.IO;
using SautinSoft.PdfVision;
using System.Drawing;

namespace Sample
{
    class Program
    {
        static void Main(string[] args)
        {
            ConvertJpegToPdf();
        }
        public static void ConvertJpegToPdf()
        {
            string inpFile = Path.GetFullPath(@"..\..\..\image-jpeg.jpg");
            string outFile = new FileInfo(@"Result.pdf").FullName;
            // Before starting, we recommend to get a free 100-day key:
            // https://sautinsoft.com/start-for-free/

            // Apply the key here:
            // SautinSoft.PdfVision.SetLicense("...");


            PdfVision v = new PdfVision();
            ImageToPdfOptions options = new ImageToPdfOptions();
            options.JpegQuality = 95;

            try
            {
                v.ConvertImageToPdf(new string[] {inpFile}, outFile, options);
                System.Diagnostics.Process.Start(new System.Diagnostics.ProcessStartInfo(outFile) { UseShellExecute = true });
            }
            catch (Exception ex)
            {
                Console.WriteLine($"Error: {ex.Message}");
                Console.ReadLine();
            }
        }
    }
}

Imports System
Imports System.IO
Imports SautinSoft.PdfVision
Imports System.Drawing

Namespace Sample
    Friend Class Program
        Shared Sub Main(ByVal args() As String)
            ConvertJpegToPdf()
        End Sub
        Public Shared Sub ConvertJpegToPdf()
            Dim inpFile As String = Path.GetFullPath("..\..\..\image-jpeg.jpg")
            Dim outFile As String = (New FileInfo("Result.pdf")).FullName
            ' Before starting, we recommend to get a free 100-day key:
            ' https://sautinsoft.com/start-for-free/

            ' Apply the key here:
            ' SautinSoft.PdfVision.SetLicense("...");

            Dim v As New PdfVision()
            Dim options As New ImageToPdfOptions()
            options.JpegQuality = 95

            Try
                v.ConvertImageToPdf(New String() {inpFile}, outFile, options)
                System.Diagnostics.Process.Start(New System.Diagnostics.ProcessStartInfo(outFile) With {.UseShellExecute = True})
            Catch ex As Exception
                Console.WriteLine($"Error: {ex.Message}")
                Console.ReadLine()
            End Try
        End Sub
    End Class
End Namespace