-- 作者:yrjc5
-- 发布时间:2012/4/2 20:17:00
-- [求助]请问这样的公式怎样设置?
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
|