请问怎样对小数四舍五入取整呢

飞扬残月 2004-11-25 08:58:50
<%=rs(itelte)%>显示的是小数,怎样取整呢?
...全文
362 点赞 收藏 5
写回复
5 条回复
切换为时间正序
当前发帖距今超过3年,不再开放新的回复
发表回复
again_gyf 2004-11-30
CInt函数
【描述】
返回表达式,此表达式已被转换为 Integer 子类型的 Variant。
【语法】
CInt(expression)
expression 参数是任意有效的表达式。
【说明】
通常,可以使用子类型转换函数书写代码,以显示某些操作的结果应被表示为特定的数据类型,而不是默认类型。例如,在出现货币、单精度或双精度运算的情况下,使用 CInt 或 CLng 强制执行整数运算。
CInt 函数用于进行从其他数据类型到 Integer 子类型的国际公认的格式转换。例如对十进制分隔符(如千分符)的识别,可能取决于系统的区域设置。
如果 expression 在 Integer 子类型可接受的范围之外,则发生错误。
下面的示例利用 CInt 函数把值转换为 Integer:
Dim MyDouble, MyInt
MyDouble = 2345.5678 ' MyDouble 是 Double。
MyInt = CInt(MyDouble) ' MyInt 包含 2346。

注意 CInt 与 Fix 和 Int 函数不同,后两者将数字的分数部分截尾取整,而不是四舍五入。当分数部分恰好为 0.5 时,CInt 函数通常将其四舍五入为最接近的偶数。例如,0.5 被四舍五入为 0,而 1.5 被四舍五入为 2。

CLng函数
【描述】
返回表达式,此表达式已被转换为 Long 子类型的 Variant。
【语法】
CLng(expression)
expression 参数是任意有效的表达式。
【说明】
通常,您可以使用子类型数据转换函数书写代码,以显示某些操作的结果应当被表达为特定的数据类型,而非默认的数据类型。例如,在出现货币运算、单精度或双精度算术运算的情况下,使用 CInt 或 CLng 函数强制进行整数运算。
CLng 函数用于进行从其他数据类型到 Long 子类型的的国际公认的格式转换。例如,对十进制分隔符和千位分隔符的识别取决于系统的区域设置。
如果 expression 取值不在 Long 子类型的允许范围内,则会出现错误。
下面的示例利用 CLng 函数把值转换为 Long:
Dim MyVal1, MyVal2, MyLong1, MyLong2
MyVal1 = 25427.45: MyVal2 = 25427.55 ' MyVal1, MyVal2 是双精度值。
MyLong1 = CLng(MyVal1) ' MyLong1 包含 25427。
MyLong2 = CLng(MyVal2) ' MyLong2 包含 25428。

注意 CLng 函数与 Fix 和 Int 函数功能不同,后两者函数对数值的小数部分进行截尾取整而不是四舍五入。当小数部分恰好等于 0.5 时, CLng 函数通常向与此数最接近的偶数取整。例如,0.5 取整为 0、1.5 取整为 2。

CSng函数
【描述】
返回表达式,该表达式已被转换为 Single 子类型的 Variant。
【语法】
CSng(expression)
expression 参数是任意有效的表达式。
【说明】
通常,可以使用子类型转换函数书写代码,以显示某些操作的结果应被表示为特定的数据类型,而不是默认类型。例如,在出现货币或整数运算的情况下,使用 CDbl 或 CSng 强制执行双精度或单精度运算。
CSng 函数用于进行从其他数据类型到 Single 子类型的国际公认的格式转换。例如,对十进制分隔符(如千分符)的识别取决于系统的区域设置。
如果 expression 在 Single 子类型允许的范围之外,则发生错误。
下面的示例利用 CSng 函数把值转换为 Single:
Dim MyDouble1, MyDouble2, MySingle1, MySingle2 ' MyDouble1, MyDouble2 是双精度值。
MyDouble1 = 75.3421115: MyDouble2 = 75.3421555
MySingle1 = CSng(MyDouble1) ' MySingle1 包含 75.34211。
MySingle2 = CSng(MyDouble2) ' MySingle2 包含 75.34216。

Cstr函数
【描述】
返回表达式,该表达式已被转换为 String 子类型的 Variant。
【语法】
CStr(expression)
expression 参数是任意有效的表达式。
【说明】
通常,可以使用子类型转换函数书写代码,以显示某些操作的结果应被表示为特定的数据类型,而不是默认类型。例如,使用 CStr 强制将结果表示为 String。
CStr 函数用于替代 Str 函数来进行从其他数据类型到 String 子类型的国际公认的格式转换。例如对十进制分隔符的识别取决于系统的区域设置。
expression 根据下表决定返回的数据:
如果 expression 为 CStr 返回
Boolean 字符串,包含 True 或 False。
Date 字符串,包含系统的短日期格式日期。
Null 运行时错误。
Empty 零长度字符串 (""。
Error 字符串,包含跟随有错误号码的单词 Error。
其他数值 字符串,包含此数字。
下面的示例利用 CStr 函数把数字转换为 String:
Dim MyDouble, MyString
MyDouble = 437.324 ' MyDouble 是双精度值。
MyString = CStr(MyDouble) ' MyString 包含 "437.324"。
回复
zhangjun 2004-11-25
t = cint(45.3)
response.write "||"&t
回复
tianch 2004-11-25
cint(rs(itelte))
回复
孟子E章 2004-11-25
<%=FormatNumber(rs(itelte),0)%>

<%=Round(rs(itelte),0)%>

回复
cailover 2004-11-25
Cint()函数

Cint函数是以四舍六入原则的,当小数部分为0.5的时候,如果整数部分为偶数,舍弃小数;如果整数部分为奇数则整数部分加1.

建议楼主用这个函数再加上小数是0.5特殊情况的判断语句.
回复
相关推荐
发帖
ASP
创建于2007-09-28

2.8w+

社区成员

ASP即Active Server Pages,是Microsoft公司开发的服务器端脚本环境。
申请成为版主
帖子事件
创建了帖子
2004-11-25 08:58
社区公告
暂无公告