Office中国论坛/Access中国论坛

标题: 如何指定生成表查询中金额的小数点后位数? [打印本页]

作者: money    时间: 2003-10-18 01:12
标题: 如何指定生成表查询中金额的小数点后位数?
在仓库管理月结中, 平均单价是这样计算的:

平均单价= (上月结存金额+本月入仓金额)/(上月结存数量+本月入仓数量)

    这时候可以做一个生成表查询, 生成的表可以反映每样物品的平均单价, 但往往是小数点后十几位, 如12.3051798  ,这样很不美观, 请教各位: 如何指定 生成表的平均单价的小数点后留的位数呢?
作者: ADAM    时间: 2003-10-18 01:33
用round函數啊
要不,自已寫個四舍五入函數得了.
Function ROUNDUSER(NUM As Double, COUNT1 As Integer)
Dim VALUE1 As Double
VALUE1 = NUM * (10 ^ COUNT1)
VALUE1 = Int(VALUE1 + 0.5) / (10 ^ COUNT1)
ROUNDUSER = VALUE1
End Function
呵呵.......
作者: ADAM    时间: 2003-10-18 22:43
漏了一句,
還要加上判斷語句:
IF NUM=0 THEN
ROUNDUSER=0
EXIT FUNCTION
ENDIF
對為零時要判斷一下
當然自訂函數還可以更精練的,我就不再囉索了...
呵呵....




欢迎光临 Office中国论坛/Access中国论坛 (http://www.office-cn.net/) Powered by Discuz! X3.3