public class PdfFitBBoxDestination :
    PdfDestination

Public Class PdfFitBBoxDestination
    Inherits PdfDestination

using (PdfDocumentProcessor pdfDocumentProcessor = new PdfDocumentProcessor())
{
    // Load a document
    pdfDocumentProcessor.LoadDocument("Demo.pdf");

    // Create a FitB destination that refers to the eighth page
    PdfFitBBoxDestination destination =
       new PdfFitBBoxDestination(pdfDocumentProcessor.Document.Pages[7]);

    // Create a bookmark
    PdfBookmark bookmark = new PdfBookmark();
    bookmark.Title = "Annotations";

    // Associate the bookmark with the created destination
    bookmark.Destination = destination;

    // Add the bookmark to the document collection
    pdfDocumentProcessor.Document.Bookmarks.Add(bookmark);

    // Save the result
    pdfDocumentProcessor.SaveDocument("out.pdf");
}

Using pdfDocumentProcessor As New PdfDocumentProcessor()
  ' Load a document
  pdfDocumentProcessor.LoadDocument("Demo.pdf")

  ' Create a FitB destination that refers to the eighth page
  Dim destination As New PdfFitBBoxDestination
    (pdfDocumentProcessor.Document.Pages(1))

  ' Create a bookmark
  Dim bookmark As New PdfBookmark()
  bookmark.Title = "Annotations"

  ' Associate the bookmark with the created destination
  bookmark.Destination = destination

  ' Add a bookmark to the document collection
  pdfDocumentProcessor.Document.Bookmarks.Add(bookmark)

  ' Save the result
  pdfDocumentProcessor.SaveDocument("out.pdf")
End Using

using (PdfDocumentProcessor pdfDocumentProcessor = new PdfDocumentProcessor())
{
    // Load a document
    pdfDocumentProcessor.LoadDocument("Demo.pdf");

    // Access eighth page properties
    PdfPageFacade pageFacade = pdfDocumentProcessor.DocumentFacade.Pages[7];

    // Create a FitBBox destination that refers to the eighth page
    PdfFitBBoxDestination destination = pageFacade.CreateFitBBoxDestination();

    // Find a specific phrase
    PdfTextSearchResults searchResults = pdfDocumentProcessor.FindText("Annotations");

    // If the phrase is found, obtain its bounding rectangle
    if (searchResults.Status == PdfTextSearchStatus.Found)
    {
        PdfPageFacade linkPageFacade =
          pdfDocumentProcessor.DocumentFacade.Pages[searchResults.PageNumber - 1];
        PdfRectangle annotationRectangle = searchResults.Rectangles[0].BoundingRectangle;

        // Create a link annotation associated with the bounding rectangle
        // and destination
        PdfLinkAnnotationFacade linkAnnotation =
          linkPageFacade.AddLinkAnnotation(annotationRectangle, destination);
        linkAnnotation.HighlightMode = PdfAnnotationHighlightingMode.Push;
    }

    // Save the result
    pdfDocumentProcessor.SaveDocument("out.pdf");
}

Using pdfDocumentProcessor As New PdfDocumentProcessor()
  ' Load a document
  pdfDocumentProcessor.LoadDocument("Demo.pdf")

  ' Access eighth page properties
  Dim pageFacade As PdfPageFacade = pdfDocumentProcessor.DocumentFacade.Pages(7)

  ' Create a destination that refers to the eighth page
  Dim destination As PdfFitBBoxDestination = pageFacade.CreateFitBBoxDestination()

  ' Find a specific phrase
  Dim searchResults As PdfTextSearchResults = pdfDocumentProcessor.FindText("Annotations")

  ' If the phrase if found, obtain its bounding rectangle
  If searchResults.Status = PdfTextSearchStatus.Found Then
    Dim linkPageFacade As PdfPageFacade =
      pdfDocumentProcessor.DocumentFacade.Pages(searchResults.PageNumber - 1)
    Dim annotationRectangle As PdfRectangle = searchResults.Rectangles(0).BoundingRectangle

    ' Create a link annotation associated with the bounding rectangle
    ' and destination
    Dim linkAnnotation As PdfLinkAnnotationFacade =
      linkPageFacade.AddLinkAnnotation(annotationRectangle, destination)
    linkAnnotation.HighlightMode = PdfAnnotationHighlightingMode.Push
  End If

  ' Save the result
  pdfDocumentProcessor.SaveDocument("out.pdf")
End Using