' Create main PDF Doc Engine
Dim engine As New PDFDocEngine("", "")
' Add new document
Dim document As Document = engine.AddDocument()
' Append new page to the document
Dim page As Page = document.AddPage(PageSizeType.A3, PageOrientationType.LandScape)
' Create new drawing
Dim drawing As Drawing = page.AddDrawing()
' Add standard font
Dim font As UInteger = document.AddFontStandard(StandardFontType.Courier, FontEncodingType.WinAnsi)
' Set Active Font
drawing.SetActiveFont(font, 50, False, False)
' Draw Text
drawing.PlaceText(100, 100, 0, "Hello World!")
' Closing drawing on the page
drawing.Close()
' Save document
document.Save("HelloWorld.pdf")