ByteScout PDF SDK – VB.NET – Use String Scaling in PDF

Home
/
Articles
/
ByteScout PDF SDK – VB.NET – Use String Scaling in PDF

printable version:
ByteScout-PDF-SDK-VB-NET-Use-String-Scaling-in-PDF.pdf

How to use string scaling in PDF in VB.NET and ByteScout PDF SDK

Tutorial on how to use string scaling in PDF in VB.NET

These sample source codes on this page below are demonstrating how to use string scaling in PDF in VB.NET. What is ByteScout PDF SDK? It is the SDK for pdf documents generation, modification and updates. Can also generate and fill PDF forms. Provides support for text (fonts, style, size, font family), layers, pdf form fields, vector and raster drawings. It can help you to use string scaling in 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. In your VB.NET project or application you may simply copy & paste the code and then run your app! You can use these VB.NET sample examples in one or many applications.

Download free trial version of ByteScout PDF SDK from our website with this and other source code samples for VB.NET.

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