Dim wfrPdf As WfrCom_PdfServer.CtrlObject

'PDF Serverのオブジェクトを作成
wfrPdf = CreateObject("Wfr.PdfServer.3")

'テンプレートの読み込み
wfrPdf.LoadTemplate("c:\sample\template.txt")

'出力イメージの作成とPDFへの出力
wfrPdf.Create()
wfrPdf.PdfOut("c:\out\sample.pdf", "PdfUser=test")

'オブジェクトの破棄
System.Runtime.InteropServices.Marshal.ReleaseComObject(wfrPdf)