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) '将表格对象加入到报表中
我是这样加的，不行，始终在顶部
加好友 
发短信
Post By：2023/11/28 9:20:00 [只看该作者]
