以文本方式查看主题

-  Foxtable(狐表)  (http://www.foxtable.com/bbs/index.asp)
--  专家坐堂  (http://www.foxtable.com/bbs/list.asp?boardid=2)
----  *计的打印摆放位置和页脚打印设置问题  (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=154548)

--  作者:lfz123
--  发布时间:2020/9/18 10:04:00
--  *计的打印摆放位置和页脚打印设置问题
Dim t As Table = Tables("明细账查询")
Dim doc As PrintDoc = e.Form.GernatePrintDoc()

For Each c As object In Doc.Body.Children
    If Typeof c Is prt.RenderTable Then
        For i As Integer = 0 To c.Rows.count-1
            If c.cells(i,1).text Like "*计" Then   
                c.cells(i,1).SpanCols = 3
            End If
        Next
    End If
Next

第一个问题:我想把以上的结果:"*计",放在3行的中间位置

Dim rt As prt.RenderText \'定义一个文本对象
rt.Text = "第[PageNo]页,共[PageCount]页" \'设置文本内容
rt.Style.FontSize = 8 \'字体大小为8磅
doc.PageFooter = rt \'作为页脚使用

第二个问题:想设置如上的页脚

doc.Preview() \'预览

--  作者:有点蓝
--  发布时间:2020/9/18 10:16:00
--  
居中要设置样式:
http://www.foxtable.com/webhelp/topics/1207.htm
http://www.foxtable.com/webhelp/topics/1170.htm

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