主题：请教，专业报表如何做"分隔线"

哈哈，气死老夫了，我还在想尽办法划线呢。

 

 

 

ra.Children.Add(rt) '加入到容器中
'加入分隔线
Dim rl As New prt.RenderText
rl.Text = "----------------------剪裁线------------------------"
rl.Style.TextAlignHorz = prt.AlignHorzEnum.Center
rl.Width = 100%
rt.Style.Spacing.Top = 10
Doc.Body.ChildRen.Add(ra) '将容器加入到报表中

 
 

呵呵，我漏掉一行。