double

[Peter Ramsebner]

Is there an explication why it's executed the then path?

Dim a As Double = 10
Dim b As Double = 3
Dim c As Double = 3
Dim x As Double
Dim y As Double = 10
x = a / b
x *= c
If x = y Then
Debug.Print("x")
End If

Peter

 

[Andrew Morton]

Is there an explication why it's executed the then path?

Dim a As Double = 10
Dim b As Double = 3
Dim c As Double = 3
Dim x As Double
Dim y As Double = 10
x = a / b
x *= c
If x = y Then
Debug.Print("x")
End If

Your Debug.Print should be outputting x.ToString and y.ToString.

Andrew

 

[Peter Ramsebner]

Your Debug.Print should be outputting x.ToString and y.ToString.

Forget the output, the question is how it is possible that x=y?

 

[Peter Ramsebner]

Debug.Print(3.3333333333333335 * 3) ' Which is 10it's not 10! It's 10,0000000005

 

[Andrew Morton]

it's not 10! It's 10,0000000005

= does not mean exact equality for floating point numbers.

It means abs(a-b)<epsilon, where epsilon is some small positive number.

For more words on the subject, see, e.g, section III of
http://www.cprogramming.com/tutorial/floating_point/understanding_floating_point_representation.html

Andrew

 

[Göran Andersson]

it's not 10! It's 10,0000000005

Which probably 10 is also.

Most numbers can't be represented exactly as a decimal. There is really
no reason why 10 or 3 would be one of them.