Foxtable(狐表)用户栏目专家坐堂 → Compute统计值时,数值的格式在哪里设置?


  共有1720人关注过本帖树形打印复制链接

主题:Compute统计值时,数值的格式在哪里设置?

帅哥哟,离线,有人找我吗?
sunion
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:童狐 帖子:241 积分:2569 威望:0 精华:0 注册:2018/1/11 14:52:00
Compute统计值时,数值的格式在哪里设置?  发帖心情 Post By:2018/4/3 12:20:00 [只看该作者]

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编辑过]

 回到顶部
帅哥哟,离线,有人找我吗?
有点甜
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2018/4/3 12:32:00 [只看该作者]

dr("最高分") = Format(dt.Compute("Max(" & dr("科目") & ")"), "0.00")

 

http://www.foxtable.com/webhelp/scr/0361.htm

 


 回到顶部
帅哥哟,离线,有人找我吗?
sunion
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:童狐 帖子:241 积分:2569 威望:0 精华:0 注册:2018/1/11 14:52:00
  发帖心情 Post By:2018/4/3 12:39:00 [只看该作者]

yes图片点击可在新窗口打开查看

 回到顶部