主题：专业报名文本为什么位于表格下方

请教各位老师，专业报表，上面是一些文本对象代码，下方是表格对像及代码，可生成的专业报表，文本却在表格下方，我想位于表格上方，哪里代码有问题？

'加入表头
rs1.Text = "基本资料" '设置文本对象的内容
rs1.Style.Font = New Font("宋体", 18 , FontStyle.Bold) '设置文本对象的字体
rs1.Style.TextAlignHorz = prt.AlignHorzEnum.Center '文本内容水平居中
doc1.Body.Children.Add(rs1) '将文本对象加入到表格中
'加入主表内容
doc1.Stacking = prt.StackingRulesEnum.InlineLeftToRight '设置排列方式
Dim bt1() As String = {"项目编号","客户简称","名称","规格型号","物料代码","版本","供方工厂","供方代码","项目组长","项目小组成员","单据日期","单位","客户编号","版本状态","最终审核","行业","PPAP提交日期"}
'Dim bz1() As Integer = {50,50,50,60,60,30,50,50,50,100,40,30,50,50,40,30,50}
Dim bz1() As Integer = {50,50,50,50,50,50,50,50,50,100,50,50,50,50,50,50,50}
'For i As Integer = 0 To 10
Dim k1 As Integer = 0
For Each b1 As String In bt1
    rt2 = New prt.RenderText() '创建文本对象
    rt2.Text = b1 & ": " & Tables("APQP基本资料主表").current(b1) '设置文本对象的内容
    rt2.Width = bz1(k1) '宽度为39毫米
   ' rt.Height = 35 '宽度为35毫米
    rt2.Style.Spacing.All = 2 '设置各个方向的间隔
    ' rt.Style.Borders.All = New prt.Linedef(1, Color.Red) '设置边框
    rt2.Style.Borders.Bottom = New prt.Linedef
    rt2.Style.TextAlignHorz = prt.AlignHorzEnum.Center '水平居中
    rt2.Style.TextAlignVert = prt.AlignVertEnum.Center '垂直居中
    doc1.Body.Children.Add(rt2) '将文本对象加入到报表
k1 = k1 + 1
Next

下方为表格代码，以下省略

。。。。。

 

 

此主题相关图片如下：111.png

 做好布局。先把doc分成两个容器，一个头部，一个中间。控制容器的布局，然后往容器里加入具体对象。

 

 你贴的代码无法测试，请做一个可以测试的例子发上来。