Examples: Currency data type

' Currency is calculated to four decimal places. Print earnings@ ' Prints 10.4444

' Explicitly declare two Currency variables.
Dim sales As Currency
Dim expenses As Currency
sales@ = 20.9999
expenses@ = 10.5555
' Implicitly declare a Currency variable.
earnings@ = sales@ - expenses@

' Currency is calculated to four decimal places. Print earnings@ ' Prints 10.4444