Foxtable(狐表)用户栏目专家坐堂 → [求助]四舍五入


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

主题:[求助]四舍五入

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


加好友 发短信
等级:童狐 帖子:266 积分:1700 威望:0 精华:0 注册:2013/5/5 17:46:00
[求助]四舍五入  发帖心情 Post By:2013/5/21 17:38:00 [只看该作者]

舍弃四舍五入  直接取整 比如26.3=27

用表达式能不能实现

如果不能实现

用代码应该怎么实现


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


加好友 发短信
等级:六尾狐 帖子:1418 积分:7167 威望:0 精华:0 注册:2013/3/18 8:37:00
  发帖心情 Post By:2013/5/21 17:41:00 [只看该作者]

Ceiling 返回大于或等于指定字的最小整
 

Dim Val As Double = 123.1
Dim
Lng As Long = Math.Ceiling(Val)

执行后变量Lng的值将等于124

[此贴子已经被作者于2013-5-21 17:41:18编辑过]

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


加好友 发短信
等级:童狐 帖子:266 积分:1700 威望:0 精华:0 注册:2013/5/5 17:46:00
  发帖心情 Post By:2013/5/21 18:53:00 [只看该作者]

这个应该怎么执行

 

e.Form.Controls("Label2").text= DataTables("计算器").Compute("Sum(金额)")

我用的是这个代码求合

想把这个合后面的小数都取整 13.2=14


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


加好友 发短信
等级:六尾狐 帖子:1418 积分:7167 威望:0 精华:0 注册:2013/3/18 8:37:00
  发帖心情 Post By:2013/5/22 8:34:00 [只看该作者]

Math.Ceiling(DataTables("计算器").Compute("Sum(金额)"))


 回到顶部