主题：[求助]为什么这段代码有错？

 Dim ra As New prt.RenderText
        ra.DataBinding.DataSource = "tb"
        If c=2 Then
            ra.Text= "[Format(Fields!本月发生额.Value,""###,###0.00"")]"
            rt.cells(r+3,c).text = ra.Text
        Else If c=3 Then
            ra.Text= "[Format(Fields!本年累计.Value,""###,###,##0.00"")]"
            rt.cells(r+3,c).text = ra.Text
        Else
            rt.cells(r+3,c).text = tb(r,c)
        End If

没有提示出错，但是没达到效果，生成的报表显示的是：[Format(Fields!本年累计.Value,""###,###,##0.00"")]

这个试了还真不能去掉引号，就是不知道用这样的的循环生成数据对不对

示例代码里也没有这样的例子，有点不是太明白的是为什么这么多的对象都可以直接设置格式，而表格是最常用的对象，为什么没有设置显示格式的功能？

其实我觉得错不在于这段代码，我把Format的格式去掉后，就没有显示任何数据：ra.Text= "[Fields!本年累计.Value]"，

可见是这段代码里就根本没有数据。

购买了一个开发版，怎么提问一个问题，就是没人回答。

最近自己找到方法了：

　应该用这段代码： rt.cells(r+3,c).text = Format(tb(r,c),"###,###,##0.00")

建议发布一些类似的问题写入帮助文档。