Foxtable(狐表)用户栏目专家坐堂 → [求助]专业报表如何设置二行文字作为表头。


  共有4711人关注过本帖树形打印复制链接

主题:[求助]专业报表如何设置二行文字作为表头。

帅哥哟,离线,有人找我吗?
dj68301367
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:小狐 帖子:368 积分:2810 威望:0 精华:0 注册:2015/4/12 12:13:00
[求助]专业报表如何设置二行文字作为表头。  发帖心情 Post By:2022/4/5 19:25:00 [显示全部帖子]

Dim doc As New PrintDoc '定义一个报表

Dim rt As New prt.RenderText '定义一个文本对象
rt.Text = "天天向上软件有限公司" '设置文本对象的内容
rt.Style.Font = New Font("宋体", 18, FontStyle.Bold) '设置字体
rt.Style.TextAlignHorz = prt.AlignHorzEnum.Center '水平居中
rt.Style.Spacing.Bottom = 3 '设置下间隔为3毫米
'Doc.PageHeader = rt
'````````````````````````````````````````````````````
Dim rt1 As New prt.RenderText '定义一个文本对象
rt1.Text = "计划表" '设置文本对象的内容
rt1.Style.Font = New Font("宋体", 16, FontStyle.Bold) '设置字体
rt1.Style.TextAlignHorz = prt.AlignHorzEnum.Center '水平居中
rt1.Style.Spacing.Bottom = 3 '设置下间隔为3毫米
Doc.PageHeader = rt1
doc.Preview() '预览

 回到顶部