OK, I'm on a roll with these suggestions, but am almost out of them. This one has bugged me sense I was a kid. Why can't there be a money type? That way you can add, subtract, multiple and so forth without any kind of stupid conversions. It could also round. This is long over due. Let the expert programmers do this 1 time so the rest of us don't have to. This is looooong overdue.

========================================

Example:

Dim ABC ("$", true, 1, ".", 2, 2, 9, true, true) as Money

Dim A, B, C (ABC) as MoneyFormat

A=4100

B=212.4000000656

C=A+B

=====================================

1) "$" = currency type. Can be any symbol if "", then none shown

2) true = comma placement for every 3 digits left of decimal

3) 1 = min number of places before decimal

4) "." = decimal type. Can be any symbol. if "" then no decimal

5)2 = min number of numbers after the decimal

6)2 = max number of numbers after the decimal

7) 9 = number of places after decimal that it remembers. That way the extra digits are not lost.

8) true = round up or down (false means round down always)

9) true = save all digits after decimal (false means only keep rounded numbers after decimal place)

=====================================

so, you format ABC and B4A does the rest.

So, C is "$4,312.40"

A.Num is 4100.00

B.Num is 212.4000000656

C.Num is 4312.40

(this allows the full numbers to be saved even after rounding)

===============================

You can use arith functions as well

x = B.Round(2) 'rounds to 2 decimal places

so x is 212.40

X = A.Square

so x is 16,810,000

========================================

Example:

Dim ABC ("$", true, 1, ".", 2, 2, 9, true, true) as Money

Dim A, B, C (ABC) as MoneyFormat

A=4100

B=212.4000000656

C=A+B

=====================================

1) "$" = currency type. Can be any symbol if "", then none shown

2) true = comma placement for every 3 digits left of decimal

3) 1 = min number of places before decimal

4) "." = decimal type. Can be any symbol. if "" then no decimal

5)2 = min number of numbers after the decimal

6)2 = max number of numbers after the decimal

7) 9 = number of places after decimal that it remembers. That way the extra digits are not lost.

8) true = round up or down (false means round down always)

9) true = save all digits after decimal (false means only keep rounded numbers after decimal place)

=====================================

so, you format ABC and B4A does the rest.

So, C is "$4,312.40"

A.Num is 4100.00

B.Num is 212.4000000656

C.Num is 4312.40

(this allows the full numbers to be saved even after rounding)

===============================

You can use arith functions as well

x = B.Round(2) 'rounds to 2 decimal places

so x is 212.40

X = A.Square

so x is 16,810,000

Last edited: