LOTUSSCRIPT 言語

例:Fix 関数
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

関連項目