ByteScout Premium Suite – VB.NET – Create and use template in pdf with pdf sdk

Home
/
Articles
/
ByteScout Premium Suite – VB.NET – Create and use template in pdf with pdf sdk

printable version:
ByteScout-Premium-Suite-VB-NET-Create-and-use-template-in-pdf-with-pdf-sdk.pdf

How to create and use template in pdf with pdf sdk in VB.NET and ByteScout Premium Suite

This code in VB.NET shows how to create and use template in pdf with pdf sdk with this how to tutorial

The sample source code below will teach you how to create and use template in pdf with pdf sdk in VB.NET. Want to create and use template in pdf with pdf sdk in your VB.NET app? ByteScout Premium Suite is designed for it. ByteScout Premium Suite is the set that includes 12 SDK products from ByteScout including tools and components for PDF, barcodes, spreadsheets, screen video recording.

The SDK samples given below describe how to quickly make your application do create and use template in pdf with pdf sdk in VB.NET with the help of ByteScout Premium Suite. Just copy and paste the code into your VB.NET application’s code and follow the instructions. Applying VB.NET application mostly includes various stages of the software development so even if the functionality works please test it with your data and the production environment.

ByteScout provides the free trial version of ByteScout Premium Suite along with the documentation and source code samples.

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 use templates.
''' </summary>
Class Program

    Shared Sub Main()

        ' Create new document
        Dim pdfDocument = New Document()
		pdfDocument.RegistrationName = "demo"
		pdfDocument.RegistrationKey = "demo"
		
        ' Prepare simple template (for example, a logo) and draw it on every page:

        ' Create template of specified size
        Dim template = New GraphicsTemplate(250, 50)
        ' Draw the logo
        template.DrawRectangle(New SolidBrush(New ColorRGB(192, 192, 255)), 0, 0, 250, 50)
        template.DrawString("My Company Logo", New Font(StandardFonts.TimesBoldItalic, 24), New SolidBrush(), 30, 10)

        ' Add few pages and draw the prepared template on each one
        For i As Integer = 0 To 2
            Dim page = New Page(PaperFormat.A4)
            page.Canvas.DrawTemplate(template, 10, 10)
            pdfDocument.Pages.Add(page)
        Next

        ' 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