【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
        dt = GetTable()
        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

    ''' <summary>
    ''' 表データ作成（サンプル用）
    ''' </summary>
    ''' <returns></returns>
    ''' <remarks></remarks>
    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