设为首页收藏本站Access中国

Office中国论坛/Access中国论坛

 找回密码
 注册

QQ登录

只需一步,快速开始

返回列表 发新帖
查看: 2788|回复: 8
打印 上一主题 下一主题

[窗体] 怎样实现窗体控件计算结果的四舍五入显示

[复制链接]
跳转到指定楼层
1#
发表于 2008-9-22 16:54:42 | 只看该作者 回帖奖励 |倒序浏览 |阅读模式
一个是表中非零数,另一个是表中可能为零数。
在窗体中计算两个数乘积,显示结果要四舍五入。

零值不显示问题已经解决。

[:17] [:17] [:17] [:17]
分享到:  QQ好友和群QQ好友和群 QQ空间QQ空间 腾讯微博腾讯微博 腾讯朋友腾讯朋友
收藏收藏 分享分享 分享淘帖 订阅订阅
2#
发表于 2008-9-22 17:13:33 | 只看该作者
发一个四舍五入自定义函数,仅供参考

  1. '自定义自四舍五入函数
  2. '解决ACCESS97以下版本不支持Round函数
  3. '解决Round"有名"的四舍六入现象
  4. '参数: Number , 要进入四舍五入的数值
  5. '参数:N,要保留的小数位数,不足时以0补上
  6. '用法:Print myRound(1.4367, 2)        
  7. '结果:1.44
  8. Function myRound(Number As Double, N As Integer) As String
  9.     myRound = Format(Int(Number * (10 ^ N) + 0.5) / (10 ^ N), "0." & String(N, "0"))
  10. End Function
复制代码
3#
发表于 2008-9-22 20:00:39 | 只看该作者
非常好,
4#
发表于 2008-9-22 20:21:01 | 只看该作者
学习了!!
5#
 楼主| 发表于 2008-9-23 08:47:14 | 只看该作者
打怵编码,因为英语不过关。
理解有误,没有学会,请版主继续指教。

本帖子中包含更多资源

您需要 登录 才可以下载或查看,没有帐号?注册

x
6#
发表于 2008-9-23 09:01:07 | 只看该作者
非常好,
7#
发表于 2008-9-23 13:13:39 | 只看该作者
你TEXT 控件表达式中直接加入Round函数就可以了.
  1. =IIf(Round([数值1],2)=0,"",Round([序号]*[数值],2))
复制代码


修改的实例:

本帖子中包含更多资源

您需要 登录 才可以下载或查看,没有帐号?注册

x
8#
 楼主| 发表于 2008-9-23 14:14:43 | 只看该作者
谢谢江版主!

已经弄明白了。

曾经用过ROUND,原来参数设置不对。
9#
发表于 2017-6-28 17:03:51 | 只看该作者
tanhong 发表于 2008-9-23 13:13
你TEXT 控件表达式中直接加入Round函数就可以了.

学习学习求密码
您需要登录后才可以回帖 登录 | 注册

本版积分规则

QQ|站长邮箱|小黑屋|手机版|Office中国/Access中国 ( 粤ICP备10043721号-1 )  

GMT+8, 2024-5-5 23:28 , Processed in 0.096234 second(s), 33 queries .

Powered by Discuz! X3.3

© 2001-2017 Comsenz Inc.

快速回复 返回顶部 返回列表