Formato para las Cajas de Texto

Marcelo
31 de Marzo del 2004
Hola.
cómo puedo ponerle formato numérico a un text box?
explico, tengo una caja de texto en donde el usuario va a ingresar una cantidad de dinero en ella y por ejem., aparece así:
100000

eso mismo quiero que aparezca de este modo:
100.000,00

sin que el usuario tenga que digitar ni puntos ni comas
en propiedades del textbox probé poniéndole "Number" al Dataformat pero no cambió nada.

Saludos.

Santiago
31 de Marzo del 2004
Utiliza la funcion format


Ejemplo de la función Format
En este ejemplo se muestran varios usos de la función Format para dar formato a valores utilizando formatos definidos por el usuario y formatos con nombre. La verdadera salida formateada presentada por el sistema para el separador de fecha (/), de hora (:) y el literal AM/ PM depende de las configuraciones en ese momento. Cuando las horas y las fechas se vuelven a listar en el entorno de desarrollo, se utilizan los formatos abreviados de hora y de fecha de la configuración regional del código. Cuando son presentados por el código en ejecución, se utilizan los formatos abreviados de fecha y hora de la configuración regional del sistema, los cuales pueden diferir de la configuración regional del código. En este ejemplo se asume que es Inglés/Estados Unidos.

MiHora y MiFecha se presentan en el entorno de desarrollo utilizando configuraciones actuales de fecha corta y hora corta.

Dim MiHora, MiFecha, MiCadena
MiHora = #17:04:23#
MiFecha = #27 enero 1993#

' Devuelve la hora actual del sistema en el formato largo de hora definido por el sistema.
MiCadena = Format(Time, "Long Time")

' Devuelve la fecha actual del sistema en el formato largo de fecha definido por el sistema.
MiCadena = Format(Date, "Long Date")

MiCadena = Format(MiHora, "h:m:s") ' Devuelve "17:4:23".
MiCadena = Format(MiHora, "hh:mm:ss AMPM") ' Devuelve "05:04:23 PM".
MiCadena = Format(MiFecha, "dddd, d mmm aaaa")' Devuelve "Miércoles,
' 27 de Ene de 1993".
' Si no se suministra el formato, devuelve una cadena.
MiCadena = Format(23) ' Devuelve "23".

' Formatos definidos por el usuario.
MiCadena = Format(5459.4, "##,##0.00") ' Devuelve "5.459,40".
MiCadena = Format(334.9, "###0.00") ' Devuelve "334,90".
MiCadena = Format(5, "0.00%") ' Devuelve "500,00%".
MiCadena = Format("HOLA", "<") ' Devuelve "hola".
MiCadena = Format("Esto es", ">") ' Devuelve "ESTO ES".

Andres Guerrero
31 de Marzo del 2004
Utiliza el Maskedit es un control adicional

en las referencias

Saludos