ByteScout PDF SDK - VBScript and VB6 - Transform Drawing in PDF - ByteScout

ByteScout PDF SDK – VBScript and VB6 – Transform Drawing in PDF

  • Home
  • /
  • Articles
  • /
  • ByteScout PDF SDK – VBScript and VB6 – Transform Drawing in PDF

transform drawing in PDF in VBScript and VB6 using ByteScout PDF SDK

Make transform drawing in PDF in VBScript and VB6

:

Tutorial on how to do transform drawing in PDF in VBScript and VB6

Sample source codes below will show you how to cope with a difficult task, for example, transform drawing in PDF in VBScript and VB6. Transform drawing in PDF in VBScript and VB6 can be implemented with ByteScout PDF SDK. ByteScout PDF SDK is the library 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.

VBScript and VB6, code samples for VBScript and VB6, developers help to speed up the application development and writing a code when using ByteScout PDF SDK. VBScript and VB6 sample code is all you need: copy and paste the code to your VBScript and VB6 application’s code editor, add a reference to ByteScout PDF SDK (if you haven’t added yet) and you are ready to go! This basic programming language sample code for VBScript and VB6 will do the whole work for you in implementing transform drawing in PDF in your app.

Trial version can be downloaded from our website. Source code samples for VBScript and VB6 and documentation are included.

Try it today: Get 60 Day Free Trial or sign up for Web API

Transformations.vbs
      
' This example demonstrates how to use coordinate space transformations. ' Create Bytescout.PDF.Document object Set pdfDocument = CreateObject("Bytescout.PDF.Document") pdfDocument.RegistrationName = "demo" pdfDocument.RegistrationKey = "demo" Set comHelpers = pdfDocument.ComHelpers ' Add page Set page1 = comHelpers.CreatePage(comHelpers.PAPERFORMAT_A4) pdfDocument.Pages.Add(page1) Set canvas = page1.Canvas ' Prepare pens Set blackPen = comHelpers.CreateSolidPen(comHelpers.CreateColorRGB(0, 0, 0), 2.0) blackPen.Opacity = 50 Set bluePen = comHelpers.CreateSolidPen(comHelpers.CreateColorRGB(0, 0, 255), 2.0) bluePen.Opacity = 50 Set greenPen = comHelpers.CreateSolidPen(comHelpers.CreateColorRGB(0, 255, 0), 2.0) 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") ' Open document in default PDF viewer app Set shell = CreateObject("WScript.Shell") shell.Run "result.pdf", 1, false

Try it today: Get 60 Day Free Trial or sign up for Web API

MORE INFORMATION

Get 60 Day Free Trial or Visit ByteScout PDF SDK page

Explore ByteScout PDF SDK documentation

WEB API VERSION

Sign Up for free Web API key

Explore Web API Documentation

Tutorials:

prev
next