Compute统计值时,数值的格式如果用代码在哪里设置?比如平均分2位小数?
Dim dr As
DataRow = e.DataRow
Dim dt
As
DataTable =DataTables("学生成绩")
If e.DataCol.Name = "科目"
And dr.IsNull("科目") = False
Then
dr("最高分") = dt.Compute("Max(" &
dr("科目") &
")")
dr("最低分") =
dt.Compute("Min(" & dr("科目") & ")")
dr("平均分") = dt.Compute("Avg(" &
dr("科目") &
")")
End If
我在做表时,平均值结果好多个小数,有没有办法用代码限制一下?
rt0.Cells(2,1).Text = dt.Compute("Avg(语文)")
rt0.Cells(2,2).Text = dt.Compute("Avg(数学)")
rt0.Cells(2,3).Text = dt.Compute("Avg(英语)")
rt0.Cells(2,4).Text = dt.Compute("Avg(物理)")
rt0.Cells(2,5).Text = dt.Compute("Avg(化学)")
rt0.Cells(2,6).Text = dt.Compute("Avg(政治)")
rt0.Cells(2,7).Text = dt.Compute("Avg(历史)")
rt0.Cells(2,8).Text = dt.Compute("Avg(地理)")
rt0.Cells(2,9).Text = dt.Compute("Avg(生物)")
rt0.Cells(2,10).Text = dt.Compute("Avg(体育)")
rt0.Cells(2,11).Text = dt.Compute("Avg(总分)")
[此贴子已经被作者于2018/4/3 12:30:01编辑过]