竖向打印时页脚不显示 - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

测试没有问题

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

doc.PageSetting.PaperKind = 9

Dim rt As New prt.RenderText '定义一个文本对象

rt.Text = "Hello Foxtable" '设置文本对象的内容

doc.Body.Children.Add(rt) '将文本对象加入到报表

Dim yj As New prt.RenderText '定义一个文本对象

yj = New prt.RenderText '设置文本对象的内容

yj.Text = "第[PageNo]页共[PageCount]页" '设置文本内容

yj.Style.TextAlignHorz = prt.AlignHorzEnum.center '页脚中间对齐

yj.Style.FontSize = 10 '字体大小为10磅

yj.Style.Padding.Bottom = -20 '底端内容缩进10毫米

Doc.PageFooter = yj '作为页脚使用

doc.Preview() '预览

主题：竖向打印时页脚不显示