RESPONDER UNA PREGUNTA

Si para responder la pregunta, crees necesario enviar un archivo adjunto, puedes hacerlo a traves del correo [email protected]

    Pregunta:  62509 - DUDA SOBRE COMPORTAMIENTO DE DOUBLES Y SINGLES
Autor:  Martín Andrade Rentería
tengo un grid donde se vacían cantidades con decimales, el programa suma estas cantidades de una columna, pero en un momento ciertos números provocan que se aumenten decimales de más, mis cantidades son de solo 2 dígitos decimales por lo que se me hace extraño que el resultado tenga 5 decimales, para reproducir este comportamiento se puede usar el siguiente código:

'Empieza->
Dim i As Integer
Dim total As Single
Dim values(28) As String

values(0) = "4.3"
values(1) = "0.01"
values(2) = "0.01"
For i = 0 To 2
total = total + Val(Format(values(i)))
Next

MsgBox total
'<-termina


Nombre
Apellidos
Correo
Comentarios