Formato para las Cajas de Texto
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.
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.
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".
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".
