ByteScout PDF Suite - VB.NET - Fill form 1099-int with pdf sdk - ByteScout

ByteScout PDF Suite – VB.NET – Fill form 1099-int with pdf sdk

  • Home
  • /
  • Articles
  • /
  • ByteScout PDF Suite – VB.NET – Fill form 1099-int with pdf sdk

fill form 1099 int with pdf sdk in VB.NET using ByteScout PDF Suite

Learn to code in VB.NET to make fill form 1099 int with pdf sdk with this simple How-To tutorial

Easy to understand coding instructions are written to assist you to try-out the features without the requirement to write your own code. ByteScout PDF Suite helps with fill form 1099 int with pdf sdk in VB.NET. ByteScout PDF Suite is the set that includes 6 SDK products 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.

Want to speed up the application development? Then this VB.NET, code samples for VB.NET, developers help to speed up the application development and writing a code when using ByteScout PDF Suite. To use fill form 1099 int with pdf sdk in your VB.NET project or application just copy & paste the code and then run your app! VB.NET application implementation mostly involves various stages of the software development so even if the functionality works please check it with your data and the production environment.

ByteScout PDF Suite is available as a free trial. You may get it from our website along with all other source code samples for VB.NET applications.

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 fill PDF form programmatically. ''' </summary> Class Program Shared Sub Main() ' Map of form fields and sample values to set Dim fieldMap As New Dictionary(Of String, Object)() fieldMap.Add("c2_1[0]", True) ' Void fieldMap.Add("c2_1[1]", True) ' CORRECTED fieldMap.Add("f2_1[0]", "John Smith, 12 Palm st., Hill Valley, CA 12345") ' PAYER'S name, street address, city or town, ... fieldMap.Add("f2_2[0]", "123456") ' PAYER'S TIN fieldMap.Add("f2_3[0]", "234567") ' RECIPIENT'S TIN fieldMap.Add("f2_4[0]", "John Doe") ' RECIPIENT'S name fieldMap.Add("f2_5[0]", "23 Elm st., 345") ' Street address (including apt. no.) fieldMap.Add("f2_6[0]", "Hill Valley, CA 12345") ' City Or town, state Or province, country, And ZIP Or foreign postal code fieldMap.Add("c2_2[0]", True) ' FATCA filing requirement fieldMap.Add("f2_7[0]", "345678") ' Account number (see instructions) fieldMap.Add("f2_8[0]", "456789") ' Payer's RTN (optional) fieldMap.Add("f2_9[0]", "1000.00") ' 1 Interest income fieldMap.Add("f2_10[0]", "11.00") ' 2 Early withdrawal penalty fieldMap.Add("f2_11[0]", "12.00") ' 3 Interest on U.S. Savings Bonds And Treas. obligations fieldMap.Add("f2_12[0]", "13.00") ' 4 Federal income tax withheld fieldMap.Add("f2_13[0]", "14.00") ' 5 Investment expenses fieldMap.Add("f2_14[0]", "15.00") ' 6 Foreign tax paid fieldMap.Add("f2_15[0]", "16.00") ' 7 Foreign country Or U.S. possession fieldMap.Add("f2_16[0]", "17.00") ' 8 Tax-exempt interest fieldMap.Add("f2_17[0]", "18.00") ' 9 Specified private activity bond interest fieldMap.Add("f2_18[0]", "19.00") ' 10 Market discount fieldMap.Add("f2_19[0]", "20.00") ' 11 Bond premium fieldMap.Add("f2_20[0]", "21.00") ' 12 Bond premium on Treasury obligations fieldMap.Add("f2_21[0]", "22.00") ' 13 Bond premium on tax-exempt bond fieldMap.Add("f2_22[0]", "567890") ' 14 Tax-exempt And tax credit bond CUSIP no. fieldMap.Add("f2_23[0]", "AA") ' 15 State [field 1] fieldMap.Add("f2_24[0]", "BB") ' 15 State [field 2] fieldMap.Add("f2_25[0]", "33") ' 16 State identification no. [field 1] fieldMap.Add("f2_26[0]", "44") ' 16 State identification no. [field 2] fieldMap.Add("f2_27[0]", "30.00") ' 17 State tax withheld [field 1] fieldMap.Add("f2_28[0]", "40.00") ' 17 State tax withheld [field 2] ' Load PDF form Dim pdfDocument = New Document("f1099int.pdf") pdfDocument.RegistrationName = "demo" pdfDocument.RegistrationKey = "demo" ' Get second page ("Copy 1") Dim page = pdfDocument.Pages(1) ' Get widget by its name and change value For Each keyValuePair In fieldMap Dim annotation As Annotation = page.Annotations(keyValuePair.Key) If TypeOf (annotation) Is CheckBox Then CType(annotation, CheckBox).Checked = CType(keyValuePair.Value, Boolean) ElseIf TypeOf (annotation) Is EditBox Then CType(annotation, EditBox).Text = CType(keyValuePair.Value, String) End If Next ' Save modified document pdfDocument.Save("result.pdf") ' Cleanup pdfDocument.Dispose() ' Open document in default PDF viewer app Process.Start("result.pdf") End Sub End Class

ON-PREMISE OFFLINE SDK

60 Day Free Trial or Visit ByteScout PDF Suite Home Page

Explore ByteScout PDF Suite Documentation

Explore Samples

Sign Up for ByteScout PDF Suite Online Training

ON-DEMAND REST WEB API

Get Your API Key

Explore Web API Docs

Explore Web API Samples

VIDEO

ON-PREMISE OFFLINE SDK

60 Day Free Trial or Visit ByteScout PDF Suite Home Page

Explore ByteScout PDF Suite Documentation

Explore Samples

Sign Up for ByteScout PDF Suite Online Training

ON-DEMAND REST WEB API

Get Your API Key

Explore Web API Docs

Explore Web API Samples

Tutorials:

prev
next