看了帮助文件中的“多个分组”代码如下

Dim doc As New PrintDoc
Dim rt As New prt.RenderText
Dim ra As New prt.RenderArea
ra.Style.Spacing.Bottom = 2
ra.DataBinding.DataSource = BindTables("订单") \'将容器绑定到订单表
ra.DataBinding.Grouping.Expressions.Add("Fields!产品.Value") \'增加两个分组，分别是产品和雇员
ra.DataBinding.Grouping.Expressions.Add("Fields!雇员.Value") \'
ra.Style.Spacing.Bottom = 2

\'这一个RenderText无需设置DataBinding，这样每一个分组只打印一次
rt.Text= "产品:[Fields!产品.Value] 雇员:[Fields!雇员.Value]"
rt.Style.FontSize = 14
rt.Style.FontBold = True
ra.Children.Add(rt)

\'这一个RenderText需要单独设置DataBinding，这样才会针对每一个数据行打印副本
rt = New prt.RenderText
rt.Text = "日期:[Format(Fields!日期.Value,""yyyy-MM-dd"")] 客户:[Fields!客户.Value] 数量:[Fields!数量.Value]"
rt.DataBinding.DataSource = ra.DataBinding.DataSource \'不能漏掉这一行
ra.Children.Add(rt)
doc.body.Children.Add(ra)
doc.Preview()

我想实现图中的“10”靠右，就像图2中的那样，该怎么实现

表格的话用Style.TextAlignHorz = prt.AlignHorzEnum.Right 可以实现

RenderArea中的话一直调试不成功，请教老师

世态炎凉啊。。。。难道不能实现。。。

用表格的话又不能实现多个分组

你的表述不清，别人不明白你的意思。

分组报表用表格怎么不能实现多个分组呢？

一个单元格一个容器，分组报表就指定一个容器，也就是说它把所有内容放在一个容器里，也就是只有一个单元格，要内容靠右排的话可以针对多个单元格或多个容器，但指定的容器是一个，要靠右的话是容器内的所有内容都动，我想实现的是指定单个容器内多列内容中的某列内容靠右，就像能把“日期”列里的年、月、日指定出来一样，研究帮助好多天，找不出办法来，

老爹在哪啊

楼主为何不用rendertable呢，非要放在容器中吗，每个实例rendertext都是个整体诶，没法单独设置格式，除非你用rendergraphy做成段落试试

其实用rendertable一样可以分组统计的啊

在尝试rendertable，合并单元格形式引用关联表，希望不是很大