主题：[求助]关于专业报表的段落处理

http://www.foxtable.com/help/topics/1183.htm

Dim doc  As New PrintDoc  '定义一个报表
Dim rt As New prt.RenderTable() '定义一个表格对象
doc.Body.Children.Add(rt) '将表格对象加入到报表中
rt.Style.GridLines.All = New prt.Linedef  '设置网格线

Dim rpar As New prt.RenderParagraph() '定义一个段落对象
Dim f As New Font(rpar.Style.Font, FontStyle.Bold) '定义一个同样但加粗的字体
rpar.Content.AddText("这是一个段落. 现在是正常文本. " & vbcrlf)
rpar.Content.AddText("现在的文本是加粗的. ", f)
rpar.Content.AddText("这一句是红色的. ", Color.Red)
rpar.Content.AddText("这一句是上标形式,上标不再是难题. "  & vbcrlf, prt.TextPositionEnum.Superscript)
rpar.Content.AddText("现在字体加粗,而且是红色. "  & vbcrlf, f, Color.Red)
rpar.Content.AddText("现在字体加粗,红色,而且是下标形式. ", f, Color.Red, prt.TextPositionEnum.Subscript)
rpar.Content.AddText("现在又是正常的文本了. ")
rpar.Content.AddText("最后,我们来插入一个图标: ")
rpar.Content.AddImage(getimage("logon.ico"))
rpar.Content.AddText(".")

rt.Cells(0,0).Text = "1234"
rt.cells(0,1).RenderObject = rpar

Doc.Preview() '预览报表

 回复6楼，你要弄成表格才行

 也就是再加入一个表格，左边填入1、2、3、4，右边填入内容。