主题：求一个统计数据的方法！

DataTables("表A").Compute("Count(订单编号)")

写错了，这样才对

 

Syscmd.Filter.HideSameValues()
msgbox(Tables("表A").Compute("Count(第一列)"))

或者这样

 

msgbox(DataTables("表A").GetValues("第一列").Count)

msgbox(DataTables("表A").GetValues("年|编号").Count)

 

 字符列同样可以统计啊，例子上传上来。

Dim q As new QueryBuilder
q.TableName = "销量统计"
q.SelectString = "Select 年, 月, count(编号) as 编号个数 from (Select Distinct 编号, year(日期) As 年, month(日期) As 月 from {表A}) group by 年,月"
q.Build
MainTable = Tables("销量统计")

 

数据源，指定一下

 

Dim q As new QueryBuilder

q.ConnectionName = "数据源"
q.TableName = "销量统计"
q.SelectString = "Select 年, 月, count(编号) as 编号个数 from (Select Distinct 编号, year(日期) As 年, month(日期) As 月 from {表A}) group by 年,月"
q.Build
MainTable = Tables("销量统计")

 表名，列名你要改一下啊，例子我测试正常。

 贴出你的完整代码。

 我测试没有问题，你上传带有数据源的项目上了测试。