-- 作者:mamuaiqing
-- 发布时间:2013/1/12 16:38:00
-- 专业报表中问题请教老师
上图先,在表格底下加上一行文本出现了图中的分页现象,底下还有这么多空白文字就跑下页去,请教老师怎么禁止分页?
rx = New prt.RenderText rx.Text = "经办人: " & Tables("订单").Current("经办人") rx.Style.FontBold = True \'字体加粗 rx.Style.FontSize = 11 \'大体大小为16磅 rx.Style.Spacing.Top = 3 rx.Style.TextAlignHorz = prt.AlignHorzEnum.Right \'水平靠右 doc.Body.Children.Add(rx) 此主题相关图片如下:图3.png
|