主题：[求助]Aggregate(AggregateEnum.Average, x1, r, 18, r)

下载信息  [文件大小：   下载次数： ]

点击浏览该文件:理数小题分分析表2.xls

统计此表中列“难度”、“区分度”：卷二 = 主观题平均分(序号13-19)   理数 = 主、客观题的平均分(序号1-19)

代码：

卷二：

dr("难度") = Tables(Km & "小题分析").Aggregate(AggregateEnum.Average, 12, r, 18, r)
dr("区分度") = Tables(Km & "小题分析").Aggregate(AggregateEnum.Average, 12, q, 18, q)

理数：

dr("难度") = Tables(Km & "小题分析").Aggregate(AggregateEnum.Average, 0, r, 18, r)
dr("区分度") = Tables(Km & "小题分析").Aggregate(AggregateEnum.Average, 0, q, 18, q)

执行结果有误，怎么修改代码？请指教。谢谢！

卷一统计没问题：

dr("难度") = Tables(Km & "小题分析").Aggregate(AggregateEnum.Average, 0, r, 11, r)
dr("区分度") = Tables(Km & "小题分析").Aggregate(AggregateEnum.Average, 0, q, 11, q)