Dando formato a los numeros (Función FormatDateTime)

11/9/07 - Descripción

Devuelve una expresión con formato de número.

Sintaxis

FormatNumber(Expresión [,NúmDígitosDespuésDeDecimal [,IncluirDígitoInicio [,UsarParéntesisParaNúmerosNegativos [,GrupoDígitos]]]])

La sintaxis de la función FormatNumber tiene las siguientes partes:

Parte	Descripción
Expresión	Requerido. Expresión a la que se va a aplicar formato.
NúmDígitosDespuésDeDecimal	Opcional. Valor numérico que indica cúantos lugares se muestran a la derecha del decimal. El valor predeterminado es -1, que indica que se usa la configuración regional del equipo.
IncluirDígitoInicio	Opcional. Constante de tres estados que indica si se debe mostrar o no un cero inicial para valores fraccionarios. Consulte la sección Valores para saber cuáles son los valores permitidos.
UsarParéntesisParaNúmerosNegativos	Opcional. Constante de tres estados que indica si se deben encerrar o no los valores negativos entre paréntesis. Consulte la sección Valores para saber cuáles son los valores permitidos.
GrupoDígitos	Opcional. Constante de tres estados que indica si se deben agrupar o no los números con el delimitador de grupos especificado en el Panel de control. Consulte la sección Valores para saber cuáles son los valores permitidos.

Valores

Los argumentos IncluirDígitoInicio, UsarParéntesisParaNúmerosNegativos y GrupoDígitos tienen los siguientes valores:

Constante	Valor	Descripción
TristateTrue	-1	True
TristateFalse	0	False
TristateUseDefault	-2	Usa la configuración regional del equipo.

Comentarios

Cuando se omiten uno o más de los argumentos opcionales, los valores de los argumentos omitidos los proporciona la configuración regional del equipo.

Nota: Toda la información de configuración y valores se obtiene de la ficha Número de Configuración regional.

El siguiente ejemplo usa la función FormatNumber para dar formato a un número para que tenga cuatro lugares decimales:

Function EjemploDeFormatNumber
Dim MiAngulo, MiSecante, MiNumero
MiAngulo = 1.3 ' Define un ángulo en radianes.
MiSecante = 1 / Cos(MiAngulo) ' Calcula la secante.
EjemploDeFormatNumber = FormatNumber(MiSecante,4)

' Da formato a MiSecante para que tenga cuatro lugares decimales.
End Function

Autoría, licencia y acciones sobre este artículo

Informe de Pedro Rufo Martín* Webmaster de www.asptutor.com URL: http://www.asptutor.com/ Atención: Copyright. Este artículo no se puede reproducir sin la autorización expresa del autor. * Para consultas técnicas utilizar la lista de correo. Versión imprimible del artículo Enviar artículo por e-mail Publicar un comentario del artículo

Añadir un comentario del artículo Los comentarios de los visitantes son para ampliar la información del artículo. Cualquiera puede participar.

Se muestra un comentario revisado

Añadir un comentario del artículo

Enlaces:

Maestrosdelweb

  Ir arriba