Problema con formato de numeros

[carrerohm]

Hola a todos,

Estoy realizando una aplicacion para Ingeniería y utilizo todas mis variables como tipo Decimal. El problema que tengo es que cuando mando a colocar los resultados en los textbox me presenta demasiados decimales. Quisiera saber como hago para que me presente los datos con un formato definido.

Gracias....

[lucasiramos]

Hola. Para acortar los decimales de una expresión debes usar la función Round. Ejemplo:

Código:

Private Sub Command1_Click()
	MsgBox Round(85.4321, 2)
End Sub

Con el parametro NumDigitsAfterDecimal se define cuantos decimales queres mostrar.

Saludos. Lucas

[carrerohm]

Gracias lucas, pero....

No existe una forma de asignarle a un text box por ejemplo un formato definido. Osea, para no tener que redondear cada vez que coloque el numero???

Lo que pasa es que seria mas facil realizar un form y asignarle a cada text box el formato a utilizar sin necesidad de ponerlo cada vez de colocar el numero???

Solo por preguntar.... sino no modo....

[lucasiramos]

Estuve probando con el control MaskEdBox, pero no anda. La verdad, la única manera que se me ocurre es que armes un control ActiveX. Sería un control muy sencillo, por lo que no tendrías que tener muchos problemas.

Saludos. Lucas

[acervantes]

imagino que tienes un evento donde controlas que sólo ingrese números en los textbox que lo necesiten, en ese mismo evento puedes usar

formatnumber(variablenumero,nrodecimales)

o con round(), como lo desees...

[aavg]

Haz lo siguiente

Textbox1.Text = Format(Variable, "###,###.00")

En este ejemplo anterior el número de decimales que desplegaría serían únicamente 2 si quieres mas basta con que aumentes el numero de Ceros 0's en la mascara.