Ajustar formato de $

Hola Marco, creo que podrías usar la función PadLeft, a esta función le
indicas el tamaño que deseas que tenga y el te ajusta el espacio en blanco a
la izquierda hasta completar el tamaño indicado quedando así la instrucción
que necesitas

Antigua: Format(CInt(Me.lblTotalPagar.Text), "$ #,###,##0")

Nueva: "$" & Format(CInt(Me.lblTotalPagar.Text), "#,###,##0").PadLeft(10)

El único problema que le veo es la fuente usada, ya que dependiendo de la
fuente el espacio en blanco puede ocupar menos de lo esperado quedándote
descuadrado todo, para usar esta opción necesitarías una fuente con paso
fijo, es decir, que todos los caracteres ocupen el mismo espacio.


Suerte.
"Marco Elgueta" escribió en el
mensaje news:

Hola a todos,
en mi aplicacion tengo una parte donde imprimo una lista de valores en $.
El
problema es que queda un muy desordenado, o sea pasa esto:

Linea 1 $ 13.500
Linea 2 $ 0
Linea 3 $ 700
Linea 4 $ 13.000

Y yo quiero esto

Linea 1 $ 13.500
Linea 2 $ 0
Linea 3 $ 700
Linea 4 $ 13.000

Trabajo con VB.Net 2003 y este codigo
Format(CInt(Me.lblTotalPagar.Text), "$ #,###,##0")

De ante mano, gracias

Sabes que no entiendo esta parte: "una fuente con paso
fijo, es decir, que todos los caracteres ocupen el mismo espacio"
Entonces que debo hacer?


"Jose Luis" wrote:

Hola Marco, creo que podrías usar la función PadLeft, a esta función le
indicas el tamaño que deseas que tenga y el te ajusta el espacio en blanco a
la izquierda hasta completar el tamaño indicado quedando así la instrucción
que necesitas

Antigua: Format(CInt(Me.lblTotalPagar.Text), "$ #,###,##0")

Nueva: "$" & Format(CInt(Me.lblTotalPagar.Text), "#,###,##0").PadLeft(10)

El único problema que le veo es la fuente usada, ya que dependiendo de la
fuente el espacio en blanco puede ocupar menos de lo esperado quedándote
descuadrado todo, para usar esta opción necesitarías una fuente con paso
fijo, es decir, que todos los caracteres ocupen el mismo espacio.


Suerte.
"Marco Elgueta" escribió en el
mensaje news:
> Hola a todos,
> en mi aplicacion tengo una parte donde imprimo una lista de valores en $.
> El
> problema es que queda un muy desordenado, o sea pasa esto:
>
> Linea 1 $ 13.500
> Linea 2 $ 0
> Linea 3 $ 700
> Linea 4 $ 13.000
>
> Y yo quiero esto
>
> Linea 1 $ 13.500
> Linea 2 $ 0
> Linea 3 $ 700
> Linea 4 $ 13.000
>
> Trabajo con VB.Net 2003 y este codigo
> Format(CInt(Me.lblTotalPagar.Text), "$ #,###,##0")
>
> De ante mano, gracias

Antes de nada probar si te sirve.

Si te descuadra el texto deberias probar con fuentes que no sean TrueType,
osea estilo Courier, pero no la Courier New que es TrueType.

Suerte.
"Marco Elgueta" escribió en el
mensaje news:

Sabes que no entiendo esta parte: "una fuente con paso
fijo, es decir, que todos los caracteres ocupen el mismo espacio"
Entonces que debo hacer?


"Jose Luis" wrote:

Hola Marco, creo que podrías usar la función PadLeft, a esta función le
indicas el tamaño que deseas que tenga y el te ajusta el espacio en
blanco a
la izquierda hasta completar el tamaño indicado quedando así la
instrucción
que necesitas

Antigua: Format(CInt(Me.lblTotalPagar.Text), "$ #,###,##0")

Nueva: "$" & Format(CInt(Me.lblTotalPagar.Text), "#,###,##0").PadLeft(10)

El único problema que le veo es la fuente usada, ya que dependiendo de la
fuente el espacio en blanco puede ocupar menos de lo esperado quedándote
descuadrado todo, para usar esta opción necesitarías una fuente con paso
fijo, es decir, que todos los caracteres ocupen el mismo espacio.


Suerte.
"Marco Elgueta" escribió en el
mensaje news:
> Hola a todos,
> en mi aplicacion tengo una parte donde imprimo una lista de valores en
> $.
> El
> problema es que queda un muy desordenado, o sea pasa esto:
>
> Linea 1 $ 13.500
> Linea 2 $ 0
> Linea 3 $ 700
> Linea 4 $ 13.000
>
> Y yo quiero esto
>
> Linea 1 $ 13.500
> Linea 2 $ 0
> Linea 3 $ 700
> Linea 4 $ 13.000
>
> Trabajo con VB.Net 2003 y este codigo
> Format(CInt(Me.lblTotalPagar.Text), "$ #,###,##0")
>
> De ante mano, gracias