Office中国论坛/Access中国论坛

标题: 求整数 [打印本页]

作者: myszh 时间: 2007-2-13 05:07
标题: 求整数
1.2==> 2

1.01==>2

excel 有一个函数叫 ROUNDUP

ACCESS怎么方便的求呢

我现在用的变通的办法比较笨

Y=IIF(X-INT([X])>0,INT([X]+1,X)

[em04]

[此贴子已经被作者于2007-2-12 21:25:10编辑过]

作者: hi-wzj 时间: 2007-2-13 18:10
[x]\1+1

作者: myszh 时间: 2007-2-13 19:25
\ 能解释一下吗[em04]

作者: zxzx2733 时间: 2007-2-13 19:49

以下是引用hi-wzj在2007-2-13 10:10:00的发言：
[x]\1+1

还是要判断是否带小数的，如果是整数的就不能用

作者: 轻风 时间: 2007-2-13 19:57
Int(X+0.99999)

作者: zxzx2733 时间: 2007-2-13 20:17

以下是引用轻风在2007-2-13 11:57:00的发言：
Int(X+0.99999)

好样：

ACCESS这边也有向上取整的函数，好象只能在VBA里用：

----------------------------------------------------------------------------------------------

函数

说明

示例

ROUND( )

根据指定的小数的位数对数字进行四舍五入

SELECT [b]ROUND([/b]qty * (price * discount), 2[b])[/b]
FROM sales

复制代码

显示基于某一折扣的总价，然后将结果四舍五入为两位小数。

FLOOR( )

将数字向下取最近（最小）的整数。

UPDATE titles
SET price = [b]FLOOR([/b]price[b])[/b]

复制代码

将

titles

复制代码

表中的所有价格向下取最近的整数。

CEILING( )

将数字向上取最近的整数。

INSERT INTO archivetitle
SELECT title, [b]CEILING([/b]price[b])[/b]
FROM titles

复制代码

将

title

复制代码

和

price

复制代码

（向上取最近的整数）值从

titles

复制代码

表复制到

archivetitle

复制代码

表。

作者: 轻风 时间: 2007-2-13 20:37

CEILING( )

将数字向上取最近的整数不可以吧。。

作者: sgrshh29 时间: 2007-2-13 23:05

以下是引用myszh在2007-2-12 21:07:00的发言：

1.2==> 2

1.01==>2

excel 有一个函数叫 ROUNDUP

ACCESS怎么方便的求呢

我现在用的变通的办法比较笨

Y=IIF(X-INT([X])>0,INT([X]+1,X)

[em04]

可以在access中直接调用excel的函数。

Function das() As Long
das = Excel.Application.roundup(1.2, 0)
Debug.Print das
das = Excel.Application.rounddown(1.9, 0)
Debug.Print das
End Function

作者: hi-wzj 时间: 2007-2-13 23:37

以下是引用myszh在2007-2-13 11:25:00的发言：
\ 能解释一下吗[em04]

\ 运算符

用来对两个数作除法并返回一个整数。

语法

result = number1\number2

\ 运算符的语法具有以下几个部分：

部分

描述

result

必需的；任何数值变量。

number1

必需的；任何数值表达式。

number2

必需的；任何数值表达式。

说明

在进行除法运算之前，数值表达式通过舍去小数部分转换成 Byte、Integer 或 Long表达式。

通常，无论 result 是不是整数，result 的数据类型都是 Byte、Byte 变体、Integer、Integer 变体、Long 或 Long 变体。任何小数部分都被删除。但是，如果任何一个表达式是 Null，则 result 为 Null。如果一个表达式是 Empty，则作为0 处理。

作者: hi-wzj 时间: 2007-2-13 23:39
大家要分清\运算符和/运算符是不同的。

欢迎光临 Office中国论坛/Access中国论坛 (http://www.office-cn.net/)