ByteScout PDF SDK – VB.NET – Add Text Field to PDF Form

Home
/
Articles
/
ByteScout PDF SDK – VB.NET – Add Text Field to PDF Form

printable version:
ByteScout-PDF-SDK-VB-NET-Add-Text-Field-to-PDF-Form.pdf

How to add text field to PDF form in VB.NET and ByteScout PDF SDK

How to add text field to PDF form in VB.NET

The sample source code below will teach you how to add text field to PDF form in VB.NET. ByteScout PDF SDK: 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 add text field to PDF form in VB.NET.

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! Detailed tutorials and documentation are available along with installed ByteScout PDF SDK if you’d like to dive deeper into the topic and the details of the API.

Free trial version of ByteScout PDF SDK is available for download from our website. Get it to try 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 text fields and theirs variations.
''' </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 simple text field with default properties
        Dim edit1 = New EditBox(20, 20, 120, 25, "editBox1")
        edit1.Text = "One two three"
        page.Annotations.Add(edit1)

        ' Add password box
        Dim edit2 = New EditBox(20, 50, 120, 25, "editBox2")
        edit2.Text = "password"
        edit2.Password = True
        page.Annotations.Add(edit2)

        ' Add multiline text field
        Dim edit3 = New EditBox(20, 80, 120, 50, "editBox3")
        edit3.Multiline = True
        edit3.Text = "The quick brown fox jumps over, the lazy dog."
        page.Annotations.Add(edit3)

        ' Demonstrate various decoration properties 
        Dim edit4 = New EditBox(20, 135, 120, 30, "editBox4")
        edit4.Text = "Decorated text field"
        edit4.TextAlign = TextAlign.Right
        edit4.BackgroundColor = New ColorRGB(255, 240, 240)
        edit4.BorderWidth = 2
        edit4.BorderStyle = BorderStyle.Dashed
        edit4.BorderColor = New ColorRGB(128, 0, 0)
        edit4.FontColor = New ColorRGB(128, 0, 0)
        edit4.Font.Size = 9
        page.Annotations.Add(edit4)

        ' 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