Set  PDFDoc  = CreateObject ( "PDFDocScout.PDFDocument" ) ' create PDFDoc object
 PDFDoc.InitLibrary "demo", "demo" ' initialize library
      
 PDFDoc.OutputFileName = "pdfdocscout_example_text_rotate.pdf" ' set output filename for PDF document
 PDFDoc.AutoOpenGeneratedPDF = true ' automatically open generated PDF document in default PDF viewer application
      
 PDFDoc.BeginDocument ' starts PDF document generation
      
 ' add text to current page - draw text at (100, 100) and rotate at 15 degrees 
 PDFDoc.Page.AddText "Hello, World!", 100, 100, 15 
  
 ' add text to current page - draw text at (100, 200) and rotate at 90 degrees 
 PDFDoc.Page.AddText "Hello, World!", 100, 200, 90
      
 ' add text to current page - draw text at (200, 200) and rotate at 180 degrees 
 PDFDoc.Page.AddText "Hello, World!", 200, 200, 180
      
 PDFDoc.EndDocument ' close pdf document generation
      
 ' disconnect from library
 Set PDFDoc = Nothing

Download example source code: pdfdocscout_example_text_rotate.zip (10,7 KB)