ByteScout Premium Suite – VB.NET – Add show-hide widget action in pdf with pdf sdk

Home
/
Articles
/
ByteScout Premium Suite – VB.NET – Add show-hide widget action in pdf with pdf sdk

printable version:
ByteScout-Premium-Suite-VB-NET-Add-show-hide-widget-action-in-pdf-with-pdf-sdk.pdf

How to add show hide widget action in pdf with pdf sdk in VB.NET and ByteScout Premium Suite

If you want to learn more then this tutorial will show how to add show hide widget action in pdf with pdf sdk in VB.NET

ByteScout simple and easy to understand tutorials are planned to describe the code for both VB.NET beginners and advanced programmers. ByteScout Premium Suite is the bundle that includes twelve SDK products from ByteScout including tools and components for PDF, barcodes, spreadsheets, screen video recording. It can add show hide widget action in pdf with pdf sdk in VB.NET.

Want to save time? You will save a lot of time on writing and testing code as you may just take the VB.NET code from ByteScout Premium Suite for add show hide widget action in pdf with pdf sdk below and use it in your application. Follow the instructions from scratch to work and copy the VB.NET code. Complete and detailed tutorials and documentation are available along with installed ByteScout Premium Suite if you’d like to learn more about the topic and the details of the API.

Trial version of ByteScout Premium Suite 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 show/hide a widget in document.
''' </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)

        ' Create widget that will be shown/hidden
        Dim editBox = New EditBox(20, 20, 100, 25, "editBox1")
        editBox.Text = "editBox1"
        page.Annotations.Add(editBox)

        ' Create button that will show the widget
        Dim buttonShow = New PushButton(20, 80, 50, 25, "buttonShow")
        buttonShow.Caption = "Show"
        page.Annotations.Add(buttonShow)
        ' Add Show action
        Dim showAction = New HideAction(False)
        showAction.Fields.Add(editBox)
        buttonShow.OnActivated = showAction

        ' Create button that will hide the widget
        Dim buttonHide = New PushButton(100, 80, 50, 25, "buttonHide")
        buttonHide.Caption = "Hide"
        page.Annotations.Add(buttonHide)
        ' Add Hide action
        Dim hideAction = New HideAction(True)
        hideAction.Fields.Add(editBox)
        buttonHide.OnActivated = hideAction

        ' 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