Rss & SiteMap
Foxtable(狐表) http://www.foxtable.com
此主题相关图片如下: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 '作为页脚使用
呵呵,这样就可以去掉时间:
rx1.Text = "第[PageNo]页,共[PageCount]页 打印日期: [Format(Today,""yyyy-MM-dd"")]"
每个[]就是一个表达式,可以随便使用各种函数。
呵呵,可以的,老程的方法好