此主题相关图片如下:2011-3-6 22-01-22.png Dim rx1 As New prt.RenderTable rx1.Cells(0,0).Text = "第[PageNo]页 共[PageCount]页 打印日期:[Today]" rx1.Style.TextAlignHorz = prt.AlignHorzEnum.Center rx1.CellStyle.Spacing.Bottom = 0.5 '底端内容缩进0.5毫米 rx1.Style.FontSize = 10 '字体大小为8磅
Doc.PageFooter = rx1 '作为页脚使用