Imports iTextSharp.text.pdf
Imports iTextSharp.text
Imports System.IO
Public Class Form1
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Try
Dim pdfDoc As New Document()
Dim pdfWrite As PdfWriter =
PdfWriter.GetInstance(pdfDoc,
New FileStream("Simple.pdf", FileMode.Create))
pdfDoc.Open()
Dim table As New PdfPTable(3)
Dim cell As New PdfPCell(New Phrase("Header spanning 3 columns"))
cell.Colspan = 3
cell.HorizontalAlignment = 1
'0=Left, 1=Centre, 2=Right
table.AddCell(cell)
table.AddCell("Col 1 Row 1")
table.AddCell("Col 2 Row 1")
table.AddCell("Col 3 Row 1")
table.AddCell("Col 1 Row 2")
table.AddCell("Col 2 Row 2")
table.AddCell("Col 3 Row 2")
pdfDoc.Add(table)
pdfDoc.Close()
Catch ex As Exception
MessageBox.Show(ex.Message)
End Try
End Sub
End Class
-------------------------------------------------------
How to specify the position of the table in a pdf file using iTextsharp
VB.NET - iTextSharp table width 100% of page
iTextSharp-Introducing-Tables
iTextSharp - Introducing Tables
Creating PDF Tables using VB.NET
VB.NET - How to set the cell width in itextsharp pdf creation
iTextSharp Tables
0 comments:
Post a Comment