tweak Str$ for single and double

[SMcNeill]

Just two problems with this type of solution to floating point values:

Code: (Select All)

Dim As Single x
Dim As Integer y
For x = 1 To .05 Step -.05
    Print x
Next x


Sleep

Cls
y = 100
For x = 1 To .05 Step -.05
    Print x, y / 100,
    If x = y / 100 Then Print "EQUAL" Else Print "NOT EQUAL"
    y = y - 5
Next x

1) You're not actually changing the values.  Just how they're displayed -- in this case you can see they actual values themselves don't match up between X and Y after the sleep statement.

2) The formatting and display gets all wacky once dealing with different variables inside that same PRINT statement.  The output for the second set of code after the SLEEP looks nothing like the code from before the SLEEP.  Extra zeros get tacked onto everything, and the value for one somehow has a nice 0998(something) trailing after it for X.






I wouldn't necessarily call the above an improvement.