Examples: Fix function

'This example shows the relationship between Fix() and Fraction().

Dim xF As Integer, yF As Integer
Dim xT As Integer, yT As Integer
xF% = Fix(-98.8)
yF% = Fix(98.2)
xT% = Int(-98.8)
yT% = Int(98.2)
Print xF%; yF%
' Output:
' -98  98
Print xT%; yT%
' Output:
' -99  98

'This example shows the relationship between Fix() and Fraction().

' Print PI
Print PI                ' Prints 3.14159265358979
' Print the integer part of PI
Print Fix(PI)           ' Prints 3
' Print the fractional part of PI
Print Fraction(PI)  ' Prints .141592653589793