如题，刚才描述可能有歧义。
比如，示例中的：
Dim doc As New PrintDoc '创建一个报表
Dim rt As New prt.RenderTable '创建一个表格对象
Dim rx
As prt.RenderText
'定义一个文本对象
doc.Body.Children.Add(rt) '将表格对象加入到报表中
rt.Style.GridLines.All = New
prt.LineDef '设置网格线
'下面的代码向表格中填入值
For r As
Integer = 0
to
5
If r <> 1
Then
For c As
Integer = 0
to
5
rx = New prt.RenderText '创建一个新的文本对象
rx.text = r &
"," & c '设置文本对象的内容
rt.Cells(r,
c).RenderObject = rx '放置在单元格中
Next
End
If
Next
'创建一个新的文本对象，内容较长。
rx = New prt.RenderText
rx.text = "这个文本非常长，以至于一页都放不下这个文本非常长，以至于一页都放不下这个文本非常长，以至于一页都放不下这个文本非常长，以至于一页都放不下这个文本非常长，以至于一页都放不下这个文本非常长，以至于一页都放不下这个文本非常长，以至于一页都放不下这个文本非常长，以至于一页都放不下这个文本非常长，以至于一页都放不下这个文本非常长，以至于一页都放不下这个文本非常长，以至于一页都放不下这个文本非常长，以至于一页都放不下这个文本非常长，以至于一页都放不下这个文本非常长，以至于一页都放不下这个文本非常长，以至于一页都放不下这个文本非常长，以至于一页都放不下这个文本非常长，以至于一页都放不下这个文本非常长，以至于一页都放不下这个文本非常长，以至于一页都放不下这个文本非常长，以至于一页都放不下这个文本非常长，以至于一页都放不下这个文本非常长，以至于一页都放不下这个文本非常长，以至于一页都放不下这个文本非常长，以至于一页都放不下这个文本非常长，以至于一页都放不下这个文本非常长，以至于一页都放不下这个文本非常长，以至于一页都放不下这个文本非常长，以至于一页都放不下这个文本非常长，以至于一页都放不下这个文本非常长，以至于一页都放不下这个文本非常长，以至于一页都放不下这个文本非常长，以至于一页都放不下这个文本非常长，以至于一页都放不下这个文本非常长，以至于一页都放不下这个文本非常长，以至于一页都放不下这个文本非常长，以至于一页都放不下——over。"
rt.Cells(4,3).RenderObject =
rx
doc.Preview() '预览报表
[此贴子已经被作者于2016/8/31 19:18:10编辑过]
加好友 
发短信
Post By：2016/8/31 9:23:00 [显示全部帖子]
