Aproximar Decimales

[javierjava]

Hola alguien me puede echa una manita de como aproximar decimas, lo estoy haciendo de esta forma pero no lo aproxima

Código: [Seleccionar]

Me.Text1.Text = FormatNumber(Round(Me.Text1.Text), 2)

solo me quitas los decimales y coloca ceros
Gracias espero no molestar a nadie 

[raul338]

No uses Round, porque devuelve un entero, usa todo lo mismo pero sin Round

[raul338]

El usa FormatNumber ya tiene un mismo parametro para redondear ademas de que podes elegir en que formato lo queres :B

Me.Text1.Text = FormatNumber$(Me.Text1.Text, 2) ' Sale "482.156,20"

[javierjava]

Muchas gracias por la ayuda me sirvio de mucho Graciaasssssssssss

[ssccaann43]

El usa FormatNumber ya tiene un mismo parametro para redondear ademas de que podes elegir en que formato lo queres :B

Me.Text1.Text = FormatNumber$(Me.Text1.Text, 2) ' Sale "482.156,20"

Raul, no basta solo con: FormatNumber(Me.Text1.Text, 2) ??

Por que usar el caracter $ ?

[79137913]

HOLA!!!

Raul, no basta solo con: FormatNumber(Me.Text1.Text, 2) ??

Por que usar el caracter $ ?

Es para que la funcion devuelva un string.

GRACIAS POR LEER!!!