以文本方式查看主题 - Foxtable(狐表) (http://foxtable.net/bbs/index.asp) -- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2) ---- 关于页眉的处理问题 (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=172541) |
-- 作者:304376480 -- 发布时间:2021/10/18 17:04:00 -- 关于页眉的处理问题 老师您好! 专业报表里作为页眉使用,下面的代码中,公司名称这块我想在第二页不显示,只需要首页显示,怎么办? Dim ras As New prt.RenderArea \'定义一个容器 Dim ra As New prt.RenderArea \'定义一个容器 rt = New prt.RenderText \'设置文本对象的内容 rt.Text = "第[PageNo]页,共[PageCount]页" \'设置文本内容 rt.Style.TextAlignHorz = prt.AlignHorzEnum.Right \'靠右对齐 rt.Style.Borders.Bottom = New prt.LineDef(0.3, Color.Green) \'设置底边框 rt.Style.Padding.Bottom = 0.5 \'底端内容缩进0.5毫米 rt.Style.FontSize = 8 \'字体大小为8磅 ra.Children.Add(rt) ras.Children.Add(ra) rt = New prt.RenderText ‘第二页以后不显示这里的标题 rt.Text = "公司名称标题" ra.Children.Add(rt) ras.Children.Add(ra) rt = New prt.RenderText rt.Text = "单据编号" ra.Children.Add(rt) ras.Children.Add(ra) Doc.PageHeader = ras \'作为页眉使用 rt= New prt.RenderText rt.Text = "我是内容" doc.Body.Children.Add(rt) doc.print() \'预览 |
-- 作者:有点蓝 -- 发布时间:2021/10/18 17:13:00 -- 不要把公司名称放到页眉。按普通方法打印即可 |
-- 作者:304376480 -- 发布时间:2021/10/18 18:03:00 -- 不行啊,这三个模块是按上中下排列的,关键是标题在中间,不知道该如何处理?,, |
-- 作者:有点蓝 -- 发布时间:2021/10/18 20:35:00 -- 这个没有办法。要么不要把标题放在中间。要么就自己做分页和手工生成页眉。分页可以参考这个:http://www.foxtable.com/webhelp/topics/2241.htm |
-- 作者:有点蓝 -- 发布时间:2021/10/18 20:42:00 -- 或者参考这种模式,分开打印:http://www.foxtable.com/bbs/dispbbs.asp?BoardID=2&ID=161333&skin=0 |