现我做了一个报表,其中有一列金额为表达式,我需要怎样将表达式绑定到报表上去
Dim Grid0 As New prt.RenderTable '定义一个报表数据表对象
tb= Tables("o采购单子档") '定义一个数据表
cn="产品编号|20|产品名称|50|产品规格|30|产品颜色|15|产品单位|15|采购数量|15|采购单价|15|金额|15|备注|20" '显示列
ColNames=cn.split("|") '显示列转换
iw=0
For c = 0 To ColNames.Length -1
If c Mod 2=0 Then
iw+=ColNames(c+1)
Grid0.Cells(0,c/2).Text = ColNames(c)
Grid0.Cols(c/2).Width = ColNames(c+1)
Grid0.Cells(1, c/2).Text ="[Fields!" & ColNames(c) & ".Value]" '设置绑定表达式
End If