| 以文本方式查看主题 - Foxtable(狐表) (http://foxtable.com/bbs/index.asp) -- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2) ---- 怎么在专业报表中设置多个页眉呢？ (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=133688) |
| -- 作者：z769036165 -- 发布时间：2019/4/18 9:33:00 -- 怎么在专业报表中设置多个页眉呢？ 如标题，专业报表中存在页眉标题居中，页面码数靠右，页眉图标靠左，操作人和操作时间分行靠右，等多个内容，需多页打印时这些页眉都需打印显示。 或者有什么办法可以把加入报表的文本对象设置在打印时，每页都打印呢？
[此贴子已经被作者于2019/4/18 9:33:23编辑过]
|
| -- 作者：z769036165 -- 发布时间：2019/4/18 9:38:00 -- 我试过这样子不行，不知道要怎么改？ Dim rt1 As prt.RenderText rt1 = New prt.RenderText \'设置文本对象的内容 rt1.Text = "测试“ ‘设置标题 rt1.Style.TextAlignHorz = prt.AlignHorzEnum.Center\'居中对齐 rt1.Style.FontSize = 18 \'字体大小为8磅 Doc.PageHeader = rt1 \'作为页眉使用 Dim rt2 As prt.RenderText rt2 = New prt.RenderText \'设置文本对象的内容 rt2.Text = "制 表 者: " & user.Name & vbCrLf & "制表时间: " & NOW() \'设置文本内容 rt2.Style.TextAlignHorz = prt.AlignHorzEnum.Right \'靠右对齐 rt2.Style.FontSize = 9 \'字体大小为8磅 Doc.PageHeader = rt2 \'作为页眉使用 |
| -- 作者：有点甜 -- 发布时间：2019/4/18 11:36:00 -- 用表格布局，如
http://www.foxtable.com/webhelp/scr/1221.htm
|