Título: Evitar redondeo de decimales en textbox Publicado por: rapbyone en 11 Febrero 2015, 16:25 pm Estimados, tengo el siguiente código:
Código
así se ve el formulario: (http://i38.servimg.com/u/f38/14/27/29/04/sin_ty18.png) Donde primero divido el "valor 2" por 2 y el resultado lo resto al "valor 1" El problema es que el resultado en el text4.text, debería ser 84,5, pero automáticamente redondea el valor a 85. ¿Como evito que el valor se redondeé? Muchas Gracias Título: Re: Evitar redondeo de decimales en textbox Publicado por: Shell Root en 11 Febrero 2015, 16:36 pm EHN.vbs
Código
Resultado: 84.5 Título: Re: Evitar redondeo de decimales en textbox Publicado por: okik en 11 Febrero 2015, 17:15 pm Código
Usa 'Variant' para evitar el redondeo e 'Integer' para redondear. Para evitar demasiados decimales: 1.6666666667, usa FormatNumber (numero, decimales). Si no quieres usar variables. Como en el ejemplo anterior, pones: CVar(valor) <----No redondea CInt(valor) <---Redondea Título: Re: Publicado por: rapbyone en 11 Febrero 2015, 17:49 pm Se pasaron muchas gracias
Enviado desde mi LG-D805 mediante Tapatalk Título: Re: Evitar redondeo de decimales en textbox Publicado por: rapbyone en 11 Febrero 2015, 19:40 pm ¿Estimados y para aproximar un decimal, por ejemplo si tengo "76,5" me muestre 77?
Título: Re: Evitar redondeo de decimales en textbox Publicado por: okik en 11 Febrero 2015, 19:57 pm ¿Estimados y para aproximar un decimal, por ejemplo si tengo "76,5" me muestre 77? No he encontrado ninguna función para eso, no se si habrá. Puedes usar este sencillo código: Código
Lo que hace es lo siguiente: A= 76.5 '//mete el valor en A B = A - Int(A) '//B= 76.5 - 76 = 0.5 if B= 0.5 then '//Si B es igual a 0.5 entonces.... A= A- 0.5+1 '// A= 76.5 - 0.5+1 End If Label1.Caption = A '//Muestra el valor de A = 77 Título: Re: Evitar redondeo de decimales en textbox Publicado por: engel lex en 11 Febrero 2015, 20:39 pm solo para aportar algo... se puede simplificar el código de okik para ahorrarnos la comparación
Código
Título: Re: Evitar redondeo de decimales en textbox Publicado por: okik en 12 Febrero 2015, 17:32 pm solo para aportar algo... se puede simplificar el código de okik para ahorrarnos la comparación Código
Te había rectificado, pero tu ejemplo es mucho mejor. Está genial ;-). No me di cuenta que pusistes int() y te dije que si A =78 entonces el label daría 78.5. Esto es lo que pasa cuando un va de listo y resulta que soy medio listo :P. |