可以,放到容器中:http://www.foxtable.com/webhelp/topics/1220.htm
Dim doc As New PrintDoc
Dim rt As New prt.RenderTable
Dim ra As prt.RenderArea
Dim rm As prt.RenderImage
Dim rx As prt.RenderText
rt.Style.GridLines.All = New prt.LineDef
rt.CellStyle.Spacing.All = 1 '单元格内容和网格线距离1毫米
rt.Cols.Count = 3 '总列数为3
For i As Integer = 0 To 1
ra = rt.Cells(i,0).Area '引用单元格的容器
'设置文本对象
Dim rt2 As New prt.RenderTable
For r As Integer = 0 To 5
For c As Integer = 0 To 5
rx = New prt.RenderText '定义一个文本对象
rx.Text = r & "," & c '为文本对象设置内容
rt2.Cells(r, c).RenderObject = rx '将文本对象放置在单元格中
Next
Next
ra.Children.Add(rt2) '加入文本到RenderArea中
Next
doc.Body.Children.Add(rt)
Doc.Preview()