ByteScout PDF SDK – VB.NET – Add 3D Annotations to PDF

Home
/
Articles
/
ByteScout PDF SDK – VB.NET – Add 3D Annotations to PDF

printable version:
ByteScout-PDF-SDK-VB-NET-Add-3D-Annotations-to-PDF.pdf

How to add 3d annotations to PDF in VB.NET with ByteScout PDF SDK

The tutorial shows how to add 3d annotations to PDF in VB.NET

The coding tutorials are designed to help you test the features without need to write your own code. What is ByteScout PDF SDK? It is the component to help programmers in generating new pdf files, modifying and updating existing pdf documents or pdf forms. Provides support for auto-filling pdf forms, adding text with adjustable font, style, size, font family, new form fields, vector and raster drawings. It can help you to add 3d annotations to PDF in your VB.NET application.

VB.NET code samples for VB.NET developers help to speed up coding of your application when using ByteScout PDF SDK. This VB.NET sample code is all you need for your app. Just copy and paste the code, add references (if needs to) and you are all set! Code testing will allow the function to be tested and work properly with your data.

Trial version of ByteScout PDF SDK is available for free. Source code samples are included to help you with your VB.NET app.

On-demand (REST Web API) version:
Web API (on-demand version)

On-premise offline SDK for Windows:
60 Day Free Trial (on-premise)

Program.vb

      Imports Bytescout.PDF

''' <summary>
''' This example demonstrates how to create 3D annotation.
''' </summary>
Class Program

    Shared Sub Main()

        ' Create new document
        Dim pdfDocument = New Document()
        pdfDocument.RegistrationName = "demo"
		pdfDocument.RegistrationKey = "demo"
        ' Add page
        Dim page = New Page(PaperFormat.A4)
        pdfDocument.Pages.Add(page)

        ' Add 3D annotation from .u3d file
        Dim model = New ThreeDData("box.u3d")
        Dim annotation = New ThreeDAnnotation(model, 100, 100, 200, 200)
        page.Annotations.Add(annotation)

        ' Save document to file
        pdfDocument.Save("result.pdf")

        ' Cleanup 
		pdfDocument.Dispose()

        ' Open document in default PDF viewer app
        Process.Start("result.pdf")

    End Sub

End Class