Every ByteScout tool contains example VB.NET source codes that you can find here or in the folder with installed ByteScout product. ByteScout PDF SDK can use drawing transformations for PDF. It can be used from VB.NET. ByteScout PDF SDK 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.
The SDK samples like this one below explain how to quickly make your application do use drawing transformations for PDF in VB.NET with the help of ByteScout PDF SDK. This VB.NET sample code is all you need for your app. Just copy and paste the code, add references (if needs to) and you are all set! Implementing VB.NET application typically includes multiple stages of the software development so even if the functionality works please test it with your data and the production environment.
Our website provides trial version of ByteScout PDF SDK for free. It also includes documentation and source code samples.
Imports Bytescout.PDF ''' <summary> ''' This example demonstrates how to use coordinate space transformations. ''' </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 ' Prepare pens Dim blackPen = New SolidPen(New ColorRGB(0, 0, 0), 2.0F) blackPen.Opacity = 50 Dim bluePen = New SolidPen(New ColorRGB(0, 0, 255), 2.0F) bluePen.Opacity = 50 Dim greenPen = New SolidPen(New ColorRGB(0, 255, 0), 2.0F) greenPen.Opacity = 50 ' Move coordinate space zero point to (200, 200) and draw a rectangle of 50x50 dize canvas.TranslateTransform(200, 200) canvas.DrawRectangle(blackPen, 0, 0, 50, 50) ' Now zoom the coordinate space in twice and draw the same rectangle in green canvas.ScaleTransform(2, 2) canvas.DrawRectangle(greenPen, 0, 0, 50, 50) ' Now rotate the coordinate space by 30 degrees and draw the same rectangle in blue canvas.RotateTransform(30) canvas.DrawRectangle(bluePen, 0, 0, 50, 50) ' 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