ByteScout Premium Suite - VBScript - Enable superscript or subscript for text in pdf with pdf sdk - ByteScout

ByteScout Premium Suite – VBScript – Enable superscript or subscript for text in pdf with pdf sdk

  • Home
  • /
  • Articles
  • /
  • ByteScout Premium Suite – VBScript – Enable superscript or subscript for text in pdf with pdf sdk

enable superscript or subscript for text in pdf with pdf sdk in VBScript using ByteScout Premium Suite

Build enable superscript or subscript for text in pdf with pdf sdk in VBScript

:

Step-by-step instructions on how to do enable superscript or subscript for text in pdf with pdf sdk in VBScript

These sample source codes given below will show you how to handle a complex task, for example, enable superscript or subscript for text in pdf with pdf sdk in VBScript. ByteScout Premium Suite was created to assist enable superscript or subscript for text in pdf with pdf sdk in VBScript. ByteScout Premium Suite is the bundle that includes twelve SDK products from ByteScout including tools and components for PDF, barcodes, spreadsheets, screen video recording.

VBScript code snippet like this for ByteScout Premium Suite works best when you need to quickly implement enable superscript or subscript for text in pdf with pdf sdk in your VBScript application. If you want to implement this functionality, you should copy and paste code below into your app using code editor. Then compile and run your application. These VBScript sample examples can be used in one or many applications.

On our website you may get trial version of ByteScout Premium Suite for free. Source code samples are included to help you with your VBScript application.

On-demand (REST Web API) version:
 Web API (on-demand version)

On-premise offline SDK for Windows:
 60 Day Free Trial (on-premise)

SuperscripAndSubscript.vbs
      
' This example demonstrates how to create a document and save it to file. ' 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 font = comHelpers.CreateSystemFont("Arial", 16) Set brush = comHelpers.CreateSolidBrush(comHelpers.CreateColorGray(0)) Set stringFormat = comHelpers.CreateStringFormat() xPosition = 20 ' Draw normal string page1.Canvas.DrawString_4 "Normal text ", (font), (brush), xPosition, 50, (stringFormat) xPosition = xPosition + font.GetTextWidth("Normal text ") ' Draw subscript string stringFormat.Rise = -5 page1.Canvas.DrawString_4 "Subscript", (font), (brush), xPosition, 50, (stringFormat) xPosition = xPosition + font.GetTextWidth("Subscript") ' draw superscript string stringFormat.Rise = +5 page1.Canvas.DrawString_4 "Superscript", (font), (brush), xPosition, 50, (stringFormat) xPosition = xPosition + font.GetTextWidth("Superscript") ' Draw the baseline Set pen = comHelpers.CreateSolidPen(comHelpers.CreateColorRGB(0, 0, 255), 1.0) pen.Opacity = 50 page1.Canvas.DrawLine (pen), 20, 50 + font.Size, xPosition, 50 + font.Size ' 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

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