以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  我想在A4纸底部加二行表格,怎么加?  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=189365)

--  作者:xxfoxtable
--  发布时间:2023/11/28 9:20:00
--  我想在A4纸底部加二行表格,怎么加?
D im r t As N ew prt.Re nder Table() \'定义一个表格对象
r t.Cols.Count = 9\'报表_table1总列数

r t.C ellS tyle.Spa cing.All = 0.2 \'单元格内容缩进1毫米
r t.Sty le.Grid Lines.All = New pr t.Linedef \'报表_table1网格线
r t.Sty le.TextAli gnVert = p rt.AlignVe rtEnum.Center \'内容垂直居中
r t.Sty le.TextAli gnHorz = pr t.AlignHorzE num.Center

r t.Ce lls(0, 0).Text = "金额:" 
r t.Ce lls(0, 1).Text = je
r t.Ce lls(0, 2).Text = ""
r t.Ce lls(0, 3).SpanCols = 2
r t.Ce lls(0, 3).Text = “”
r t.Ce lls(0, 5).SpanCols = 4
r t.Ce lls(0, 5).Text =“”
r t.Cel ls(1, 0).Text = "审核:" 
r t.Ce lls(1, 2).Text = "调配:"
r t.Ce lls(1, 4).SpanCols = 2
r t.Ce lls(1, 4).Text = ""
r t.Ce lls(1, 8).Text = ""
r t.Y =100
d o c.Body.Child ren.Ad d(rt) \'将表格对象加入到报表中
我是这样加的,不行,始终在顶部

--  作者:有点蓝
--  发布时间:2023/11/28 9:21:00
--  
请上传实例测试