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