public class PdfFitBBoxHorizontallyDestination :
    PdfDestination

Public Class PdfFitBBoxHorizontallyDestination
    Inherits PdfDestination

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

    // Find a specific phrase
    PdfTextSearchResults textSearchResults = pdfDocumentProcessor.FindText("Total:");

    // If the phrase is found, obtain the page that contains it
    // and the top vertical coordinate of the phrase's rectangle
    if (textSearchResults.Status == PdfTextSearchStatus.Found)
    {
        PdfPage destinationPage = textSearchResults.Page;
        double top = textSearchResults.Rectangles[0].Top;

        // Create a FitBH destination
        // that positions the phrase at the top left corner of the document window
        PdfFitBBoxHorizontallyDestination destination =
                new PdfFitBBoxHorizontallyDestination(destinationPage, top);

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

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

        // Add a bookmark to the collection
        pdfDocumentProcessor.Document.Bookmarks.Add(bookmark);
    }
    pdfDocumentProcessor.SaveDocument("out.pdf");
}

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

  ' Find the specified phrase
  Dim textSearchResults As PdfTextSearchResults = pdfDocumentProcessor.FindText("Total:")

  ' If the phrase is found,obtain the page that contains it
  ' and the top vertical coordinate of the phrase's rectangle
   If textSearchResults.Status = PdfTextSearchStatus.Found Then
    Dim destinationPage As PdfPage = textSearchResults.Page
    Dim top As Double = textSearchResults.Rectangles(0).Top

    ' Create a FitBH destination
    ' that positions the phrase at the top left window corner
    Dim destination As
        New PdfFitBBoxHorizontallyDestination(destinationPage, top)

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

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

    ' Add a bookmark to the collection
    pdfDocumentProcessor.Document.Bookmarks.Add(bookmark)
  End If
  pdfDocumentProcessor.SaveDocument("out.pdf")
End Using

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

    // Access first page properties
    PdfPageFacade pageFacade = pdfDocumentProcessor.DocumentFacade.Pages[0];

    // Create a FitBH destination that refers to the first page
    PdfFitBBoxHorizontallyDestination destination =
       pageFacade.CreateFitBBoxHorizontallyDestination(134);

    // Find a specific phrase
    PdfTextSearchResults linkText = pdfDocumentProcessor.FindText("Go to Total");

    // If the phrase is found, obtain its bounding rectangle
    if (linkText.Status == PdfTextSearchStatus.Found)
    {
        PdfRectangle linkRectangle = linkText.Rectangles[0].BoundingRectangle;

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

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

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

  ' Access first page properties
  Dim pageFacade As PdfPageFacade = pdfDocumentProcessor.DocumentFacade.Pages(0)

  ' Create a FitBH destination that refers to the first page
  Dim destination As PdfFitBBoxHorizontallyDestination =
    pageFacade.CreateFitBBoxHorizontallyDestination(134)

  ' Find a specific phrase
  Dim linkText As PdfTextSearchResults = pdfDocumentProcessor.FindText("Go to Total")

  ' If the phrase is found, obtain its bounding rectangle
  If linkText.Status = PdfTextSearchStatus.Found Then
    Dim linkRectangle As PdfRectangle = linkText.Rectangles(0).BoundingRectangle

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

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