절삭하는 함수 Fix (버림하는 함수) / 절상(올림) 하는 방법

    Dim a
    Dim b
   
    a = 403.6
    b = 4536
   
    a = CLng(a)
    b = Fix(b / 10) * 10

위에서 결과값으로 a=404, b=4530이 됩니다.

참고로 CInt 는 INT 데이타 값의 소수점을 반올림 한 결과를 리턴합니다.
CLng 는 LONG 데이타 값의 소수점을 반올림 한 결과를 리턴합니다.

Fix는 소수점을 절사한 결과 값을 리턴하고,,
Int함수는 해당 값보다 작은 정수값을 리턴합니다.(??)

==> Int와 Fix는 모두 number의 분수 부분을 없애고 정수 부분만을 반환합니다.

Int와 Fix의 차이점은, number가 음수이면, Int는 number보다 작거나 같은 최초의 음의 정수를 반환하는 반면에, Fix는 number보다 크거나 같은 최초의 음의 정수를 반환합니다. 예를 들어, Int는 -8.4를 -9로 환산하지만, Fix는 -8.4를 -8로 환산합니다.

 

<<소수점 무조건 올림 처리 함수>>

Private Sub Command3_Click()
    Dim i As Currency
   
    i = 2.2
    Text2 = Int(i * -1) * -1 '2.2를 소수점 무조건 올림 올림을 하여 3을 반환
   
   
End Sub