ByteScout PDF Suite – VB.NET – Use string scaling in pdf with pdf sdk

Home
/
Articles
/
ByteScout PDF Suite – VB.NET – Use string scaling in pdf with pdf sdk

printable version:
ByteScout-PDF-Suite-VB-NET-Use-string-scaling-in-pdf-with-pdf-sdk.pdf

How to use string scaling in pdf with pdf sdk in VB.NET using ByteScout PDF Suite

Learning is essential in computer world and the tutorial below will demonstrate how to use string scaling in pdf with pdf sdk in VB.NET

Use string scaling in pdf with pdf sdk is simple to apply in VB.NET if you use these source codes below. ByteScout PDF Suite can use string scaling in pdf with pdf sdk. It can be applied from VB.NET. ByteScout PDF Suite is the bundle that provides six different SDK libraries to work with PDF from generating rich PDF reports to extracting data from PDF documents and converting them to HTML. This bundle includes PDF (Generator) SDK, PDF Renderer SDK, PDF Extractor SDK, PDF to HTML SDK, PDF Viewer SDK and PDF Generator SDK for Javascript.

The SDK samples given below describe how to quickly make your application do use string scaling in pdf with pdf sdk in VB.NET with the help of ByteScout PDF Suite. Simply copy and paste in your VB.NET project or application you and then run your app! 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 PDF Suite free trial version is available on our website. VB.NET and other programming languages are supported.

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 the font scaling to expand a string.
''' </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)


        Dim font = New Font("Arial", 16)
        Dim brush = New SolidBrush()
        Dim stringFormat = New StringFormat()

        stringFormat.Scaling = 100.0F
        page.Canvas.DrawString("Normal string 100.0%", font, brush, 20, 20, stringFormat)

        stringFormat.Scaling = 50.0F
        page.Canvas.DrawString("Squeezed string 50.0%", font, brush, 20, 50, stringFormat)

        stringFormat.Scaling = 150.0F
        page.Canvas.DrawString("Expanded string 150.0%", font, brush, 20, 80, stringFormat)


        ' 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