以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  如何将页脚设置只在最后一页显示？  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=133719)
--  作者：z769036165
--  发布时间：2019/4/18 17:17:00
--  如何将页脚设置只在最后一页显示？
有些报表需要在后面显示签字/签字时间项，用页脚设置后，其他页也存在

用文本对象直接添加，可是可以，但是会紧跟表格数据后面，不能显示直接在页面的最底部，需要显示在页面最底部的签字/签字时间项。
--  作者：有点甜
--  发布时间：2019/4/18 19:09:00
--  

参考

 

Dim doc As New PrintDoc \'定义一个报表
Dim rt As New prt.RenderText \'定义一个文本对象
rt.Text = "Hello Foxtable" & vbcrlf & vbcrlf & vbcrlf & vbcrlf & vbcrlf & vbcrlf & "aaaasldkfjalsdk" \'设置文本对象的内容
doc.Body.Children.Add(rt) \'将文本对象加入到报表

rt = New prt.RenderText \'定义一个文本对象
rt.Text = "Hello Foxtable" \'设置文本对象的内容
rt.y = "Parent.Height+" & CStr(doc.PageSetting.TopMargin) & "-" & 10
doc.Body.Children.Add(rt) \'将文本对象加入到报表
doc.Preview() \'预览