Dim wfrPdf As WfrCom_PdfServer.CtrlObject 'PDF Serverのオブジェクトを作成 wfrPdf = CreateObject("Wfr.PdfServer.3") '1つ目の帳票定義ファイル(*.wfr）のオープンとデータの入力 wfrPdf.Open("c:\sample\sample1.wfr") wfrPdf.Import("Data1", 0, "c:\sample\sample1.csv") '2つ目帳票定義ファイル(*.wfr）のオープンとデータの入力 wfrPdf.AddReport() wfrPdf.Open("c:\sample\sample2.wfr") wfrPdf.Import("Data1", 0, "c:\sample\sample2_1.csv") wfrPdf.Import("Data2", 0, "c:\sample\sample2_2.csv") 'PDFへの出力 wfrPdf.PdfOut("c:\out\sample.pdf") 'オブジェクトの破棄 System.Runtime.InteropServices.Marshal.ReleaseComObject(wfrPdf)