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

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

printable version:
ByteScout-PDF-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 and ByteScout PDF Suite

How to write a robust code in VB.NET to draw with color profiles in pdf with pdf sdk with this step-by-step tutorial

We made thousands of pre-made source code pieces for easy implementation in your own programming projects. Want to draw with color profiles in pdf with pdf sdk in your VB.NET app? ByteScout PDF Suite is designed for it. ByteScout PDF Suite is the set that includes 6 SDK products to work with PDF from generating rich PDF reports to extracting data from PDF documents and converting them to HTML. This bundle includes PDF (Generator) SDK, PDF Renderer SDK, PDF Extractor SDK, PDF to HTML SDK, PDF Viewer SDK and PDF Generator SDK for Javascript.

The SDK samples given below describe how to quickly make your application do draw with color profiles in pdf with pdf sdk in VB.NET with the help of ByteScout PDF Suite. Simply copy and paste in your VB.NET project or application you and then run your app! Enjoy writing a code with ready-to-use sample codes in VB.NET.

ByteScout PDF Suite free trial version is available on our website. VB.NET and other programming languages are supported.

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