ByteScout Premium Suite - VB.NET - Insert images in pdf with pdf sdk - ByteScout

ByteScout Premium Suite – VB.NET – Insert images in pdf with pdf sdk

  • Home
  • /
  • Articles
  • /
  • ByteScout Premium Suite – VB.NET – Insert images in pdf with pdf sdk

How to insert images in pdf with pdf sdk in VB.NET using ByteScout Premium Suite

If you want to learn more then this tutorial will show how to insert images in pdf with pdf sdk in VB.NET

The documentation is designed for a specific purpose to help you to apply the features on your side. ByteScout Premium Suite can insert images in pdf with pdf sdk. It can be applied from VB.NET. ByteScout Premium Suite is the bundle that includes twelve SDK products from ByteScout including tools and components for PDF, barcodes, spreadsheets, screen video recording.

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 insert images in pdf with pdf sdk below and use it in your application. IF you want to implement the functionality, just copy and paste this code for VB.NET below into your code editor with your app, compile and run your application. Further improvement of the code will make it more robust.

ByteScout provides the free trial version of ByteScout Premium Suite along with the documentation and source code samples.

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 add images of various formats. ''' </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 canvas = page.Canvas ' Add JPEG image and draw unscaled Dim image1 = New Image("Image1.jpg") canvas.DrawImage(image1, 20, 20) ' Add PNG image and draw reduced twice Dim image2 = New Image("Image2.png") canvas.DrawImage(image2, 20, 520, image2.Width / 2, image2.Height / 2) ' Add TIFF image and draw scaled disproportionately Dim image3 = New Image("Image3.tif") canvas.DrawImage(image3, 270, 520, image3.Width / 2, image3.Height / 4) ' Add GIF image and draw rotated 90 degrees and scaled Dim image4 = New Image("Image4.gif") canvas.TranslateTransform(390, 650) canvas.RotateTransform(90) canvas.DrawImage(image4, 0, 0, image4.Width / 4, image4.Height / 4) ' 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

ON-PREMISE OFFLINE SDK

60 Day Free Trial or Visit ByteScout Premium Suite Home Page

Explore ByteScout Premium Suite Documentation

Explore Samples

Sign Up for ByteScout Premium 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 Premium Suite Home Page

Explore ByteScout Premium Suite Documentation

Explore Samples

Sign Up for ByteScout Premium Suite Online Training

ON-DEMAND REST WEB API

Get Your API Key

Explore Web API Docs

Explore Web API Samples

Tutorials:

prev
next