主题：[求助]请问这样的公式怎样设置？

    Dim bd1 As New SQLGroupTableBuilder("统计表1","入库明细")
    Dim dt1 As fxDataSource
    bd1.C
    bd1.Groups.AddDef("商品代码") 
    bd1.Totals.AddDef("数量","入库_数量") 
    bd1.Totals.AddExp("金额","数量*单价","入库_金额") 
    bd1.Filter = "日期 >= '" & qssj & "' And 日期 <= '" & jssj & "'"
    dt1 = bd1.BuildDataSource()
   Tables("窗口1_Table1").DataSource  = dt1

With DataTables("窗口1_Table1").DataCols
      .Add("进价",Gettype(Double), "[入库_金额]/[入库_数量]")
End With

 

 

请问老师，这个错误提示怎样解决？

此主题相关图片如下：搜狗截图_2012-03-04_20-13-07.png

谢谢老师，问题解决了