主题：咨询老师

请老师和各位高手帮忙：我有一主表“交易表”内有第一列为“综合成交价格”，第二列为“M1成交数量”，第三列为“M1成交金额”，第四列为“M2成交数量”，第五列为“M2成交金额”。

现拟生成统计表“价格分布表”第一列为品种，第二列为“分布二元以下”，第三列为“分布二元至三元”，第四列为“分布三至四元”，第五列为“四元以上”。现要求给价格分布表赋值：

第一行第一列赋值为“MM1”，第二行第一列赋值为“MM2”，第三行第一列赋值为“MMT”小计；第四行第一列赋值为“VM1”,第五行第一列赋值为“VM2”,第六第一列赋值为“VMT”;

第一行第二列赋值为：M1二元以下的累计成交额，第一行第三列为：M1二元至三元的累计成交额，第一行第四列为M1三元至四元累计成交额，第一行第五列M1四元以上累计成交额；

第二行第二列赋值为：M2二元以下的累计成交额，第二行第三列为：M2二元至三元的累计成交额，第二行第四列为：M2三元至四元累计成交额，第二行第五列为：M2四元以上累计成交额；

第三行第二列赋值为：MMT二元以下的小计成交额，第三行第三列为MMT二元至三元的小计成交额，第三行第四列为MMT三元至四元小计成交额；第三行第五列为：MMT四元以上小计成交额； 

第四行第二列为M1二元以下的累计成交量，第四行第三列为M1二元至三元的累计成交量，第四行第四列为M1三元至四元累计成交量；第四行第五列M1四元以上累计成交量；

第五行第二列为M2二元以下的累计成交量，第五行第三列为M2二元至三元的累计成交量，第五行第四列为M2三元至四元累计成交量；第五行第五列M2四元以上累计成交量；

第六行第二列为VMT二元以下的累计成交额，第六行第三列为VMT二元至三元的累计成交额，第六行第四列为VMT三元至四元累计成交额；第六行第五列VMT四元以上累计成交额；

请老师和高手帮忙编写出生成统计表的代码。谢谢！

老师，帮助中的例子是固定的科目，而我的表中价格并不是固定的，而是要求归类分组，所以不会编码。再就是第一列要求按照价格区间赋值，而不是像例子中有固定的值如语文，数学等。谢谢。

Dim dr As DataRow = e.DataRow
Dim dt As DataTable =DataTables("t000000")
If e.DataCol.Name = "品种" And dr.IsNull("品种") = False Then
    dr("二元以下") = dt.Compute("Sum(mm1)", "综合成交价格>0 and 综合成交价格<2")
dr("二至三元") = dt.Compute("Sum(mm1)", "综合成交价格>2 and 综合成交价格<3")
 dr("三至四元") = dt.Compute("Sum(mm1)", "综合成交价格>3 and 综合成交价格<4")
dr("四元以上") = dt.Compute("Sum(mm)", "综合成交价格>4 ")
End If

以上是我想赋第一行的值，但值还为空白。

请老师指教。

 

主表：t000000

date	pm1	vm1	mm1	pm2	vm2	mm2	pm3	vm3	mm3
2016-04-20	3.36	973000	3366340	2.21	92400	666204	1.43	1000	1430
2016-04-21	3.02	1636000	4770710	2.93	4800	38064	4.57	1000	1570
2016-04-22	3.32	1109000	3820730	3.72	3600	31392	1.73	1000	1730
2016-04-23	3.34	820000	2627790	4.59	123600	1156536	1.9	1000	1900
2016-04-25	3.32	1117000	3559770	4.55	121200	1261212	2.09	1000	2090
2016-04-26	3.13	948000	2765880	1.61	103200	1164072	3.3	1000	2300
2016-04-27	2.85	948000	2765800	2.77	117600	1488864	2.53	2000	5060
2016-04-28	4.56	694000	1833690	3.02	96000	1296588	3.78	1000	2780

 

统计表:

id	二元以下	二元至三元	三元至四元	四元至五元	五元以上
mm1
mm2
mm3
MMT
VM1
VM2
VM3
VMT

请老师帮助写出代码。

PM为价格，VM为成交量，MM为成交额，T 为小计

上述是主表与要求统计的表。统计表也就是价格成交及成交量集中趋势表。我不会赋值，请老师指教。帮助写出填报代码。谢谢！