ByteScout Premium Suite – VB.NET – Draw with color profiles in pdf with pdf sdk

Home
/
Articles
/
ByteScout Premium Suite – VB.NET – Draw with color profiles in pdf with pdf sdk

printable version:
ByteScout-Premium-Suite-VB-NET-Draw-with-color-profiles-in-pdf-with-pdf-sdk.pdf

How to draw with color profiles in pdf with pdf sdk in VB.NET using ByteScout Premium Suite

This code in VB.NET shows how to draw with color profiles in pdf with pdf sdk with this how to tutorial

The coding instructions are formulated to help you to try-out the features without the requirement to write your own code. What is ByteScout Premium Suite? It is the set that includes 12 SDK products from ByteScout including tools and components for PDF, barcodes, spreadsheets, screen video recording. It can help you to draw with color profiles in pdf with pdf sdk in your VB.NET application.

Want to quickly learn? This fast application programming interfaces of ByteScout Premium Suite for VB.NET plus the guidelines and the code below will help you quickly learn how to draw with color profiles in pdf with pdf sdk. 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. Enjoy writing a code with ready-to-use sample VB.NET codes.

All these programming tutorials along with source code samples and ByteScout free trial version are available for download from our website.

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 use color profiles.
''' </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)

        ' Load ICC color profile
        Dim iccProfile = New ICCBasedColorspace("USWebCoatedSWOP.icc")
        ' Create profiled color brush
        Dim iccColor = New ColorICC(iccProfile, New ColorCMYK(0, 100, 0, 0))
        Dim iccBrush = New SolidBrush(iccColor)
        ' Draw a circle using the brush
        page.Canvas.DrawCircle(iccBrush, 200, 200, 100)

        ' 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