Problemas con decimales

[loquillo7]

Buenas Foreros tengo un problema con los decimales nose si visual presenta alguna funcion para poder utilizar numeros decimales por ejemplo para ""redondear a 5,6,..n decimales" ya que por ejemplo cuando quiero mostrar :
0.150000 solo me muestra 0.15 y los demas ceros no los visualiza,he utilizado la funcion format(numerodecimal,"0.000") redondeado a 3 decimales pero tengo problemas en la configuracion regional,xq no en todos los paises loa ceptan nose si hubiera alguna ora funcion mas estandar muchas gracias de antemano .

[vbx3m]

Si quieres utilizar 3 decimales y ademas te rodeondee podrias utilizar el format y el formatnumber por ejm:

Text2.Text = Format(FormatNumber(Val(Text1.Text), -1), "0.000")

Lo que hace es especificar el formato de 3 decimales y redondea el valor (decimales) del text1... Espero te sirva...

[MaxExtreme]

Iniciado por loquillo7

Buenas Foreros tengo un problema con los decimales nose si visual presenta alguna funcion para poder utilizar numeros decimales por ejemplo para ""redondear a 5,6,..n decimales" ya que por ejemplo cuando quiero mostrar :
0.150000 solo me muestra 0.15 y los demas ceros no los visualiza,he utilizado la funcion format(numerodecimal,"0.000") redondeado a 3 decimales pero tengo problemas en la configuracion regional,xq no en todos los paises loa ceptan nose si hubiera alguna ora funcion mas estandar muchas gracias de antemano .

Si tu problema es que no te añade los 0 últimos (lo cual es lógico), puedes convertir el número en cadena (VB lo hace solo), a partir de ahí mirar cuantos caracteres tiene a partir del . y si tiene menos de los deseados añadir tantos 0 como falten para completarlo.