Access向上取整的類似Excel的Ceiling函數(shù)

在Excel中有自帶的Ceiling函數(shù)可實(shí)現(xiàn)向上取整，但Access,沒有，需要自己寫一下

以下有2個(gè)函數(shù)的寫法，可參考：

Public Function Ceiling(ByVal X As Double, Optional ByVal Factor As Double = 1) As Double
  ' X is the value you want to round
  ' Factor is the optional multiple to which you want to round, defaulting to 1 （默認(rèn)值為0）
  Ceiling = (Int(X / Factor) - (X / Factor - Int(X / Factor) > 0)) * Factor
End Function