大神帮忙给看看，报表专业打印，这个要怎么写？

还有个问题：

这个绑定方式可以吗？

关联表：表A.表B.第三列.第一行

能看清楚吗？

表格的样子做出来了，在命令窗口执行：

Dim doc  As New PrintDoc  \'定义一个报表
Dim rt As New prt.RenderTable() \'定义一个表格对象
Dim rs As New prt.RenderText() \'定义一个文本对象
rs.Text = "表格标题"  \'设置文本对象的内容
rs.Style.Font = New Font("宋体", 24 , FontStyle.Bold) \'设置文本对象的字体
rs.Style.TextAlignHorz = prt.AlignHorzEnum.Center \'文本内容水平居中
rt.Style.Spacing.Top = 4  \'表格和前面对象的垂直间隔为4毫米
doc.Body.Children.Add(rs)
doc.Body.Children.Add(rt) \'将表格对象加入到报表中
rt.Style.GridLines.All = New prt.Linedef  \'设置网格线
rt.height = 100
rt.Rows.count = 9
rt.Cols.count = 4
rt.Cols(0).width = 10
rt.Cols(1).Width = 40
rt.Cols(2).Width = 10
rt.Cols(3).Width = 10
rt.cells(0,1).Spancols = 3
rt.cells(6,1).Spancols = 3
rt.cells(7,1).Spancols = 3
 doc.Preview() \'预览报

至于每个格子的内容，你可以自己填入，例如：

rt.cells(0,0) = “文本A”
rt.cells(0,1) = tables("表A.表B").Current("第二列")