Program.vb
Imports Bytescout.PDF
''' <summary>
''' This example demonstrates how to create a document and save it to file.
''' </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)
' Add sample content
Dim font = New Font(StandardFonts.Times, 24)
Dim brush = New SolidBrush()
page.Canvas.DrawString("Hello world!", font, brush, 20, 20)
' 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
Click here to get your Free Trial version of the SDK
also available as: