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


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

主题：[求助]四舍五入
帅哥哟，离线，有人找我吗？
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(金额)"))
 回到顶部
RSS2.0 | Xhtml无图版 | Xslt无图版 Copyright © 2000 - 2018 foxtable.com Tel: 4000-810-820 粤ICP备11091905号
   Powered By Dvbbs Version 8.3.0
页面执行时间 0.04688 秒, 4 次数据查询