PM> Install-Package Spire.PDF

using Spire.Pdf;
using Spire.Pdf.Graphics;
using Spire.Pdf.Graphics.Layer;
using System.Drawing;

namespace AddLayersToPdf
{
    class Program
    {
        static void Main(string[] args)
        {
            //Create a PdfDocument instance and load a sample PDF file
            PdfDocument pdf = new PdfDocument();
            pdf.LoadFromFile(@"C:\Users\Administrator\Desktop\Sample.pdf");

            //Invoke AddLayerWatermark method to add a watermark layer
            AddLayerWatermark(pdf);

            //Invoke AddLayerHeader method to add a header layer
            AddLayerHeader(pdf);

            //Save to file
            pdf.SaveToFile("AddLayers.pdf");
            pdf.Close();
        }

        private static void AddLayerWatermark(PdfDocument doc)
        {
            //Create a layer named "Watermark"
            PdfLayer layer = doc.Layers.AddLayer("Watermark");

            //Create a font
            PdfTrueTypeFont font = new PdfTrueTypeFont(new Font("Arial", 48), true);

            //Specify the watermark text
            string watermarkText = "CONFIDENTIAL";

            //Get text size
            SizeF fontSize = font.MeasureString(watermarkText);

            //Calculate two offsets
            float offset1 = (float)(fontSize.Width * System.Math.Sqrt(2) / 4);
            float offset2 = (float)(fontSize.Height * System.Math.Sqrt(2) / 4);

            //Get page count
            int pageCount = doc.Pages.Count;

            //Declare two variables
            PdfPageBase page;
            PdfCanvas canvas;

            //Loop through the pages
            for (int i = 0; (i < pageCount); i++)
            {
                page = doc.Pages[i];

                //Create a canvas from layer
                canvas = layer.CreateGraphics(page.Canvas);
                canvas.TranslateTransform(page.Canvas.Size.Width / 2 - offset1 - offset2, page.Canvas.Size.Height / 2 + offset1 - offset2);
                canvas.SetTransparency(0.4f);
                canvas.RotateTransform(-45);

                //Draw sting on the canvas of layer
                canvas.DrawString(watermarkText, font, PdfBrushes.DarkBlue, 0, 0);
            }
        }
        private static void AddLayerHeader(PdfDocument doc)
        {
            // Create a layer named "Header"
            PdfLayer layer = doc.Layers.AddLayer("Header");

            //Get page size
            SizeF size = doc.Pages[0].Size;

            //Specify the initial values of X and y
            float x = 90;
            float y = 40;

            //Get page count
            int pageCount = doc.Pages.Count;

            //Declare two variables
            PdfPageBase page;
            PdfCanvas canvas;

            //Loop through the pages
            for (int i = 0; (i < pageCount); i++)
            {
                //Draw an image on the layer
                PdfImage pdfImage = PdfImage.FromFile(@"C:\Users\Administrator\Desktop\img.jpg");
                float width = pdfImage.Width;
                float height = pdfImage.Height;
                page = doc.Pages[i];
                canvas = layer.CreateGraphics(page.Canvas);
                canvas.DrawImage(pdfImage, x, y, width, height);

                //Draw a line on the layer
                PdfPen pen = new PdfPen(PdfBrushes.DarkGray, 2);
                canvas.DrawLine(pen, x, (y + (height + 5)), (size.Width - x), (y + (height + 2)));
            }
        }
    }
} 

Imports Spire.Pdf
Imports Spire.Pdf.Graphics
Imports Spire.Pdf.Graphics.Layer
Imports System.Drawing

Namespace AddLayersToPdf
    Class Program
        Private Shared Sub Main(ByVal args() As String)

            'Create a PdfDocument instance and load a sample PDF file
            Dim pdf As PdfDocument = New PdfDocument
            pdf.LoadFromFile("C:\Users\Administrator\Desktop\Sample.pdf")

            'Invoke AddLayerWatermark method to add a watermark layer
            Program.AddLayerWatermark(pdf)

            'Invoke AddLayerHeader method to add a header layer
            Program.AddLayerHeader(pdf)

            'Save to file
            pdf.SaveToFile("AddLayers.pdf")
            pdf.Close()
        End Sub

        Private Shared Sub AddLayerWatermark(ByVal doc As PdfDocument)

            'Create a layer named "Watermark"
            Dim layer As PdfLayer = doc.Layers.AddLayer("Watermark")

            'Create a font
            Dim font As PdfTrueTypeFont = New PdfTrueTypeFont(New Font("Arial", 48), True)

            'Specify the watermark text
            Dim watermarkText As String = "CONFIDENTIAL"

            'Get text size
            Dim fontSize As SizeF = font.MeasureString(watermarkText)

            'Calculate two offsets
            Dim offset1 As Single = CSng((fontSize.Width * System.Math.Sqrt(2) / 4))
            Dim offset2 As Single = CSng((fontSize.Height * System.Math.Sqrt(2) / 4))

            'Get page count
            Dim pageCount As Integer = doc.Pages.Count

            'Declare two variables
            Dim page As PdfPageBase
            Dim canvas As PdfCanvas

            'Loop through the pages
            Dim i As Integer = 0
            While (i < pageCount)
                page = doc.Pages(i)

                'Create a canvas from layer
                canvas = layer.CreateGraphics(page.Canvas)
                canvas.TranslateTransform(page.Canvas.Size.Width / 2 - offset1 - offset2, page.Canvas.Size.Height / 2 + offset1 - offset2)
                canvas.SetTransparency(0.4F)
                canvas.RotateTransform(-45)

                'Draw sting on the canvas of layer
                canvas.DrawString(watermarkText, font, PdfBrushes.DarkBlue, 0, 0)
                i = (i + 1)
                i += 1
            End While
        End Sub

        Private Shared Sub AddLayerHeader(ByVal doc As PdfDocument)

            ' Create a layer named "Header"
            Dim layer As PdfLayer = doc.Layers.AddLayer("Header")

            'Get page size
            Dim size As SizeF = doc.Pages(0).Size

            'Specify the initial values of X and y
            Dim x As Single = 90
            Dim y As Single = 40

            'Get page count
            Dim pageCount As Integer = doc.Pages.Count

            'Declare two variables
            Dim page As PdfPageBase
            Dim canvas As PdfCanvas

            'Loop through the pages
            Dim i As Integer = 0
            While (i < pageCount)

                'Draw an image on the layer
                Dim pdfImage As PdfImage = PdfImage.FromFile("C:\Users\Administrator\Desktop\img.jpg")
                Dim width As Single = pdfImage.Width
                Dim height As Single = pdfImage.Height
                page = doc.Pages(i)
                canvas = layer.CreateGraphics(page.Canvas)
                canvas.DrawImage(pdfImage, x, y, width, height)

                'Draw a line on the layer
                Dim pen As PdfPen = New PdfPen(PdfBrushes.DarkGray, 2)
                canvas.DrawLine(pen, x, (y + (height + 5)), (size.Width - x), (y + (height + 2)))
                i += 1
            End While
        End Sub
    End Class
End Namespace

using Spire.Pdf;
using Spire.Pdf.Graphics.Layer;

namespace HideLayer
{
    class Program
    {
        static void Main(string[] args)
        {
            //Create a PdfDocument instance
            PdfDocument pdf = new PdfDocument();

            //Load a sample PDF document
            pdf.LoadFromFile("AddLayers.pdf");

            //Hide a specified layer by index
            pdf.Layers[0].Visibility = PdfVisibility.Off;

            //Hide a specified layer by name
            //pdf.Layers["Watermark"].Visibility = PdfVisibility.Off;

            //Save the result document
            pdf.SaveToFile("HideLayer.pdf");
        }
    }
}

Imports Spire.Pdf
Imports Spire.Pdf.Graphics.Layer

Namespace HideLayer
    Class Program
        Private Shared Sub Main(ByVal args() As String)

            'Create a PdfDocument instance
            Dim pdf As PdfDocument = New PdfDocument

            'Load a sample PDF document
            pdf.LoadFromFile("AddLayers.pdf")

            'Hide a specified layer by index
            pdf.Layers(0).Visibility = PdfVisibility.Off

            'Hide a specified layer by name
            'pdf.Layers["Watermark"].Visibility = PdfVisibility.Off;

            'Save the result document
            pdf.SaveToFile("HideLayer.pdf")
        End Sub
    End Class
End Namespace

using Spire.Pdf;

namespace DeleteLayer
{
    class Program
    {
        static void Main(string[] args)
        {
            //Create a PdfDocument instance
            PdfDocument pdf = new PdfDocument();

            //Load a sample PDF document
            pdf.LoadFromFile("AddLayers.pdf");

            //Remove a layer by name
            pdf.Layers.RemoveLayer(("Watermark"));

            //Save the result document
            pdf.SaveToFile("DeleteLayer.pdf", FileFormat.PDF);
        }
    }
}

Imports Spire.Pdf

Namespace DeleteLayer
    Class Program
        Private Shared Sub Main(ByVal args() As String)
            'Create a PdfDocument instance
            Dim pdf As PdfDocument = New PdfDocument

            'Load a sample PDF document
            pdf.LoadFromFile("AddLayers.pdf")

            'Remove a layer by name
            pdf.Layers.RemoveLayer("Watermark")

            'Save the result document
            pdf.SaveToFile("DeleteLayer.pdf", FileFormat.PDF)
        End Sub
    End Class
End Namespace

PM> Install-Package Spire.Presentation

using Spire.Presentation;

namespace ConvertPowerPointToHtml
{
    class Program
    {
        static void Main(string[] args)
        {
            //Initialize an instance of the Presentation class
            Presentation ppt = new Presentation();
            //Load a PowerPoint presentation
            ppt.LoadFromFile(@"E:\Program Files\Sample.pptx");

            //Specify the file path of the output HTML file 
            String result = @"E:\Program Files\PowerPointToHtml.html";

            //Save the PowerPoint presentation to HTML format
            ppt.SaveToFile(result, FileFormat.Html);
        }
    }
}

Imports Spire.Presentation

Namespace ConvertPowerPointToHtml
    Friend Class Program
        Private Shared Sub Main(ByVal args As String())
            'Initialize an instance of the Presentation class
            Dim ppt As Presentation = New Presentation()
            'Load the PowerPoint presentation
            ppt.LoadFromFile("E:\Program Files\Sample.pptx")

            'Specify the file path of the output HTML file 
            Dim result = "E:\Program Files\PowerPointToHtml.html"

            'Save the PowerPoint presentation to HTML format
            ppt.SaveToFile(result, FileFormat.Html)
        End Sub
    End Class
End Namespace

using Spire.Presentation;
using System;

namespace ConvertPowerPointSlideToHtml
{
    class Program
    {
        static void Main(string[] args)
        {
            //Initialize an instance of the Presentation class
            Presentation presentation = new Presentation();
            //Load the PowerPoint presentation
            presentation.LoadFromFile(@"E:\Program Files\Sample.pptx");

            //Get the first slide
            ISlide slide = presentation.Slides[0];

            //Specify the file path of the output HTML file 
            String result = @"E:\Program Files\SlideToHtml.html";

            //Save the first slide to HTML format
            slide.SaveToFile(result, FileFormat.Html);
        }
    }
}

Imports Spire.Presentation

Namespace ConvertPowerPointSlideToHtml
    Friend Class Program
        Private Shared Sub Main(ByVal args As String())
            'Initialize an instance of the Presentation class
            Dim presentation As Presentation = New Presentation()
            'Load the PowerPoint presentation
            presentation.LoadFromFile("E:\Program Files\Sample.pptx")

            'Get the first slide
            Dim slide As ISlide = presentation.Slides(0)

            'Specify the file path of the output HTML file 
            Dim result = "E:\Program Files\SlideToHtml.html"

            'Save the first slide to HTML format
            slide.SaveToFile(result, FileFormat.Html)
        End Sub
    End Class
End Namespace

PM> Install-Package Spire.XLS

using Spire.Xls;

namespace ConvertCsvToPdf
{
    class Program
    {
        static void Main(string[] args)
        {
            //Create a Workbook instance
            Workbook wb = new Workbook();
            //Load a CSV file
            wb.LoadFromFile("Sample.csv", ",");

            //Set SheetFitToPage property as true to ensure the worksheet is converted to 1 PDF page
            wb.ConverterSetting.SheetFitToPage = true;

            //Get the first worksheet
            Worksheet sheet = wb.Worksheets[0];

            //Loop through the columns in the worksheet
            for (int i = 1; i < sheet.Columns.Length; i++)
            {
                //AutoFit columns
                sheet.AutoFitColumn(i);
            }

            //Save the worksheet to PDF
            sheet.SaveToPdf("toPDF.pdf");
        }
    }
}

Imports Spire.Xls

Namespace ConvertCsvToPdf
    Friend Class Program
        Private Shared Sub Main(ByVal args As String())
            'Create a Workbook instance
            Dim wb As Workbook = New Workbook()
            'Load a CSV file
            wb.LoadFromFile("Sample.csv", ",")

            'Set SheetFitToPage property as true to ensure the worksheet is converted to 1 PDF page
            wb.ConverterSetting.SheetFitToPage = True

            'Get the first worksheet
            Dim sheet As Worksheet = wb.Worksheets(0)

            'Loop through the columns in the worksheet
            For i As Integer = 1 To sheet.Columns.Length - 1
                'AutoFit columns
                sheet.AutoFitColumn(i)
            Next

            'Save the worksheet to PDF
            sheet.SaveToPdf("toPDF.pdf")
        End Sub
    End Class
End Namespace

PM> Install-Package Spire.PDF

using Spire.Pdf;

namespace PrintWithDefaultPrinter
{
    class Program
    {
        static void Main(string[] args)
        {
            //Create PdfDocument object
            PdfDocument doc = new PdfDocument();

            //Load a PDF file
            doc.LoadFromFile(@"C:\Users\Administrator\Desktop\sample.pdf");

            //Print with default printer 
            doc.Print();
        }
    }
}

Imports Spire.Pdf
 
Namespace PrintWithDefaultPrinter
    Class Program
        Shared  Sub Main(ByVal args() As String)
            'Create a PdfDocument object
            Dim doc As PdfDocument =  New PdfDocument() 

            'Load a PDF file
            doc.LoadFromFile("C:\Users\Administrator\Desktop\sample.pdf")

            'Print with default printer 
            doc.Print()
        End Sub
    End Class
End Namespace

using Spire.Pdf;

namespace PrintWithSpecifiedPrinter
{
    class Program
    {
        static void Main(string[] args)
        {
            //Create a PdfDocument object
            PdfDocument doc = new PdfDocument();

            //Load a PDF file
            doc.LoadFromFile(@"C:\Users\Administrator\Desktop\sample.pdf");

            //Specify printer name
            doc.PrintSettings.PrinterName = "HP LaserJet P1007";

            //Select a page range to print
            doc.PrintSettings.SelectPageRange(1, 5);

            //Select discontinuous pages to print
            //doc.PrintSettings.SelectSomePages(new int[] { 1, 3, 5, 7 });

            //Print document
            doc.Print();
        }
    }
}

Imports Spire.Pdf
 
Namespace PrintWithSpecifiedPrinter
    Class Program
        Shared  Sub Main(ByVal args() As String)
            'Create a PdfDocument object
            Dim doc As PdfDocument =  New PdfDocument() 
 
            'Load a PDF file
            doc.LoadFromFile("C:\Users\Administrator\Desktop\sample.pdf")
 
            'Specify printer name
            doc.PrintSettings.PrinterName = "HP LaserJet P1007"
 
            'Select a page range to print
            doc.PrintSettings.SelectPageRange(1, 5)
 
            'Select discontinuous pages to print
            'doc.PrintSettings.SelectSomePages(new int[] { 1, 3, 5, 7 });
 
            'Print document
            doc.Print()
        End Sub
    End Class
End Namespace

using Spire.Pdf;

namespace PrintPdfToXps
{
    class Program
    {
        static void Main(string[] args)
        {
            //Create a PdfDocument object
            PdfDocument doc = new PdfDocument();

            //Load a PDF document
            doc.LoadFromFile(@"C:\Users\Administrator\Desktop\sample.pdf");

            //Set printer name to Microsoft XPS Document Writer
            doc.PrintSettings.PrinterName = "Microsoft XPS Document Writer";

            //Set the printed file path and name
            doc.PrintSettings.PrintToFile("PrintToXps.xps");

            //Execute printing
            doc.Print();
        }
    }
}

Imports Spire.Pdf
 
Namespace PrintPdfToXps
    Class Program
        Shared  Sub Main(ByVal args() As String)
            'Create a PdfDocument object
            Dim doc As PdfDocument =  New PdfDocument() 
 
            'Load a PDF document
            doc.LoadFromFile("C:\Users\Administrator\Desktop\sample.pdf")
 
            'Set printer name to Microsoft XPS Document Writer
            doc.PrintSettings.PrinterName = "Microsoft XPS Document Writer"
 
            'Set the printed file path and name
            doc.PrintSettings.PrintToFile("PrintToXps.xps")
 
            'Execute printing
            doc.Print()
        End Sub
    End Class
End Namespace

using Spire.Pdf;
using System.Drawing.Printing;

namespace PrintPdfSilently
{
    class Program
    {
        static void Main(string[] args)
        {
            //Create a PdfDocument object
            PdfDocument doc = new PdfDocument();

            //Load a PDF file
            doc.LoadFromFile(@"C:\Users\Administrator\Desktop\sample.pdf");

            //Specify printer name
            doc.PrintSettings.PrinterName = "HP LaserJet P1007";

            //Silent printing
            doc.PrintSettings.PrintController = new StandardPrintController();

            //Print document
            doc.Print();
        }
    }
}

Imports Spire.Pdf
Imports System.Drawing.Printing
 
Namespace PrintPdfSilently
    Class Program
        Shared  Sub Main(ByVal args() As String)
            'Create a PdfDocument object
            Dim doc As PdfDocument =  New PdfDocument() 
 
            'Load a PDF file
            doc.LoadFromFile("C:\Users\Administrator\Desktop\sample.pdf")
 
            'Specify printer name
            doc.PrintSettings.PrinterName = "HP LaserJet P1007"
 
            'Silent printing
            doc.PrintSettings.PrintController = New StandardPrintController()
 
            'Print document
            doc.Print()
        End Sub
    End Class
End Namespace

using Spire.Pdf;
using System.Drawing.Printing;

namespace PrintInDuplexMode
{
    class Program
    {
        static void Main(string[] args)
        {
            //Create a PdfDocument object
            PdfDocument doc = new PdfDocument();

            //Load a PDF file
            doc.LoadFromFile(@"C:\Users\Administrator\Desktop\sample.pdf");

            //Specify printer name
            doc.PrintSettings.PrinterName = "HP LaserJet P1007";

            //Determine if the printer supports duplex printing 
            if (doc.PrintSettings.CanDuplex)
            {
                //Set to duplex printing mode
                doc.PrintSettings.Duplex = Duplex.Default;

                //Print document
                doc.Print();
            }
        }
    }
}

Imports Spire.Pdf
Imports System.Drawing.Printing
 
Namespace PrintInDuplexMode
    Class Program
        static void Main(string() args)
        {
            'Create a PdfDocument object
            Dim doc As PdfDocument =  New PdfDocument() 
 
            'Load a PDF file
            doc.LoadFromFile("C:\Users\Administrator\Desktop\sample.pdf")
 
            'Specify printer name
            doc.PrintSettings.PrinterName = "HP LaserJet P1007"
 
            'Determine if the printer supports duplex printing 
            if (doc.PrintSettings.CanDuplex)
            {
                'Set to duplex printing mode
                doc.PrintSettings.Duplex = Duplex.Default
 
                'Print document
                doc.Print()
            }
        }
    End Class
End Namespace

using Spire.Pdf;

namespace PrintInGrayscale
{
    class Program
    {
        static void Main(string[] args)
        {
            //Create a PdfDocument object
            PdfDocument doc = new PdfDocument();

            //Load a PDF file
            doc.LoadFromFile(@"C:\Users\Administrator\Desktop\sample.pdf");

            //Specify printer name
            doc.PrintSettings.PrinterName = "HP LaserJet P1007";

            //Print in black and white
            doc.PrintSettings.Color = false;

            //Print document
            doc.Print();
        }
    }
}

Imports Spire.Pdf
 
Namespace PrintInGrayscale
    Class Program
        Shared  Sub Main(ByVal args() As String)
            'Create a PdfDocument object
            Dim doc As PdfDocument =  New PdfDocument() 
 
            'Load a PDF file
            doc.LoadFromFile("C:\Users\Administrator\Desktop\sample.pdf")
 
            'Specify printer name
            doc.PrintSettings.PrinterName = "HP LaserJet P1007"
 
            'Print in black and white
            doc.PrintSettings.Color = False
 
            'Print document
            doc.Print()
        End Sub
    End Class
End Namespace

using Spire.Pdf;
using Spire.Pdf.Print;

namespace PrintToDifferentTrays
{
    class Program
    {
        static void Main(string[] args)
        {
            //Create a PdfDocument object
            PdfDocument doc = new PdfDocument();

            //Load a PDF file
            doc.LoadFromFile(@"C:\Users\Administrator\Desktop\sample.pdf");

            //Register the PaperSettings event with a delegate that handles paper settings event
            doc.PrintSettings.PaperSettings += delegate (object sender, PdfPaperSettingsEventArgs e)
            {
                // Set the paper source of tray 1 to 1-10 pages
                if (1 <= e.CurrentPaper && e.CurrentPaper <= 10)
                {
                    e.CurrentPaperSource = e.PaperSources[0];
                }

                //Set the paper source of tray 2 to the rest pages
                else
                {
                    e.CurrentPaperSource = e.PaperSources[1];
                }
            };

            //Print document
            doc.Print();
        }
    }
}

Imports Spire.Pdf
Imports Spire.Pdf.Print
 
Namespace PrintToDifferentTrays
    Class Program
        Shared  Sub Main(ByVal args() As String)
            'Create a PdfDocument object
            Dim doc As PdfDocument =  New PdfDocument() 
 
            'Load a PDF file
            doc.LoadFromFile("C:\Users\Administrator\Desktop\sample.pdf")
 
            'Register the PaperSettings event with a delegate that handles paper settings event
            doc.PrintSettings.PaperSettings Function delegate(ByVal sender As Object, ByVal e As PdfPaperSettingsEventArgs) As +=
                'Set the paper source of tray 1 to 1-10 pages
                If 1 <= e.CurrentPaper And e.CurrentPaper <= 10 Then
                    e.CurrentPaperSource = e.PaperSources(0)
                End If
 
                'Set the paper source of tray 2 to the rest pages
                else
                {
                    e.CurrentPaperSource = e.PaperSources(1)
                }
            End Function

 
            'Print document
            doc.Print()
        End Sub
    End Class
End Namespace

PM> Install-Package Spire.XLS

using Spire.Xls;

namespace ShowExcelComments
{
    class Program
    {
        static void Main(string[] args)
        {
            {
                //Initialize a Workbook instance and load the excel document
                Workbook workbook = new Workbook();
                workbook.LoadFromFile("Comments.xlsx");

                //Get the first worksheet
                Worksheet sheet = workbook.Worksheets[0];

                //Hide the specific comment in the worksheet
                sheet.Comments[0].IsVisible = false;

                //Save the document
                workbook.SaveToFile("HideComment.xlsx", ExcelVersion.Version2013);
                workbook.Dispose();
            }
        }
    }
}

Imports Spire.Xls

Namespace ShowExcelComments
    
    Class Program
        
        Private Shared Sub Main(ByVal args() As String)

            'Initialize a Workbook instance and load the excel document
            Dim workbook As Workbook = New Workbook
            workbook.LoadFromFile("Comments.xlsx")

            'Get the first worksheet
            Dim sheet As Worksheet = workbook.Worksheets(0)

            'Hide the specific comment in the worksheet
            sheet.Comments(0).IsVisible = false

            'Save the document
            workbook.SaveToFile("HideComment.xlsx", ExcelVersion.Version2013)
            workbook.Dispose
        End Sub
    End Class
End Namespace

using Spire.Xls;

namespace ShowExcelComments
{
    class Program
    {
        static void Main(string[] args)
        {
            {
                //Initialize a Workbook instance and load the excel document
                Workbook workbook = new Workbook();
                workbook.LoadFromFile("HideComment.xlsx");

                //Get the first worksheet
                Worksheet sheet = workbook.Worksheets[0];

                //Show the specific comment in the worksheet
                sheet.Comments[0].IsVisible = true;

                //Save the document
                workbook.SaveToFile("ShowComment.xlsx", ExcelVersion.Version2013);
                workbook.Dispose();
            }
        }
    }
}

Imports Spire.Xls

Namespace ShowExcelComments
    
    Class Program
        
        Private Shared Sub Main(ByVal args() As String)

            'Initialize a Workbook instance and load the excel document
            Dim workbook As Workbook = New Workbook
            workbook.LoadFromFile("HideComment.xlsx")

            'Get the first worksheet
            Dim sheet As Worksheet = workbook.Worksheets(0)

            'Show the specific comment in the worksheet
            sheet.Comments(0).IsVisible = true

            'Save the document
            workbook.SaveToFile("ShowComment.xlsx", ExcelVersion.Version2013)
            workbook.Dispose
        End Sub
    End Class
End Namespace