「東雲忠太郎」の平凡な日常のできごと

2010.06.01

VBでPDFを作成する方法

カテゴリ：カテゴリ未分類

【PDF】PDF作成コンポーネント(PdfWriterLib.dll)をダウンロードし自作する方法
こちらからPdfWriteLib.dllをダウンロードします。
http://online-de.from.tv/dll/index.html

【コードサンプル】
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button27.Click
'==================
'文字列表示
'==================
Me.Pdf1.PdfSetBodyData(PdfWriterLib.BodyType.Text, "データ００１")

'ヘッダー作成
'==================
Me.Pdf1.PdfSetHeader("ヘッダーです")
'==================
'フッター作成
'==================
Me.Pdf1.PdfSetFooter("フッターです")
'==================
'表（テーブル）作成
'==================
Dim dt As DataTable

Me.Pdf1.PdfSetBodyData(PdfWriterLib.BodyType.Talbe, dt)
'==================
'画像張り付け
'==================
Me.Pdf1.PdfSetBodyData(PdfWriterLib.BodyType.Image, "C:\Users\x300\Dock.jpg")

'出力
'==================
Me.Pdf1.PdfCreate("pdf.pdf")
End Sub

Public Function GetTable() As DataTable
Dim dt As DataTable
dt = New DataTable
dt.Columns.Add("Field1")
dt.Columns.Add("Field2")
Dim R As DataRow
R = dt.NewRow()
R.Item(0) = "123"
R.Item(1) = "234"
dt.Rows.Add(R)
Return dt
End Function

お気に入りの記事を「いいね！」で応援しよう