以文本方式查看主题

-  Foxtable(狐表)  (http://www.foxtable.com/bbs/index.asp)
--  专家坐堂  (http://www.foxtable.com/bbs/list.asp?boardid=2)
----  在PDF的每一页的页脚居中输入:第i页,共n页  (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=184186)

--  作者:xluoping
--  发布时间:2022/11/27 16:46:00
--  在PDF的每一页的页脚居中输入:第i页,共n页
在网上有搜索一些 iTextSharp 的资料,但是一直没有调试好,请老师帮助


Dim dlg As New OpenFileDialog \'定义一个新的OpenFileDialog
dlg.Filter = "PDF文件|*.pdf" \'设置筛选器
If dlg.ShowDialog = DialogResult.Ok Then \'如果用户单击了确定按钮
    Dim reader As New iTextSharp.text.pdf.PdfReader(dlg.FileName)
    Dim n As Integer = reader.NumberOfPages
    Dim str As String = ""
    For i As Integer = 1 To n

 \'代码,在每一页的页脚居中输入:第i页,共n页
        
    Next
    reader.Close()
End If

--  作者:有点蓝
--  发布时间:2022/11/27 20:32:00
--  
第三方的东西请自行学习,iTextSharp 我也没有用过,暂时没有时间研究