在VB.net中使用iText向现有.pdf添加图像和文本

Imports iTextSharp.text
Imports iTextSharp.text.pdf

Dim reader As New PdfReader("path/to/existing.pdf")

Dim stamper As New PdfStamper(reader, New FileStream("path/to/output.pdf", FileMode.Create))

Dim content As PdfContentByte = stamper.GetOverContent(pageNumber) ' pageNumber表示要添加图像的页码
Dim image As Image = Image.GetInstance("path/to/image.jpg")
image.SetAbsolutePosition(x, y) ' x和y表示图像的左下角坐标
content.AddImage(image)

Dim content As PdfContentByte = stamper.GetOverContent(pageNumber) ' pageNumber表示要添加文本的页码
content.BeginText()
content.SetFontAndSize(BaseFont.CreateFont(), fontSize) ' 设置字体和字号
content.SetTextMatrix(x, y) ' x和y表示文本的起始坐标
content.ShowText("Your text here") ' 添加文本内容
content.EndText()

stamper.Close()
reader.Close()