Como se alinea a la derecha?
Publicado por Elizabeth (71 intervenciones) el 07/01/2005 20:49:24
Hola a todos, estoy elaborando un programa que me imprime mis datos en un txt, de esta forma
DNombre = rstEmpleados.Fields("nombre").Value
Nombre = Mid(DNombre & Space(15), 1, 15)
DCantidad = rstEmpleados.Fields("Cantidad").Value
sSQL = Nombre & DCantidad
Print #1, sSQL
y en mi txt quiero que quede ai:
Elizabeth 32050
El problema es que mi cantidad tiene que quedar sin decimales y alineado a la derecha como se ve en mi codigo Nombre tiene espacio de 15 caracteres y cantidad le tengo qe poner un espacio de 16 caracteres justificado a la derecha y sin ceros del lado izquierdo por eso no pude utilizar Format(Cantidad,"0000000000000000")
bueno gracias amigos espero me puedan ayudar esta vez
DNombre = rstEmpleados.Fields("nombre").Value
Nombre = Mid(DNombre & Space(15), 1, 15)
DCantidad = rstEmpleados.Fields("Cantidad").Value
sSQL = Nombre & DCantidad
Print #1, sSQL
y en mi txt quiero que quede ai:
Elizabeth 32050
El problema es que mi cantidad tiene que quedar sin decimales y alineado a la derecha como se ve en mi codigo Nombre tiene espacio de 15 caracteres y cantidad le tengo qe poner un espacio de 16 caracteres justificado a la derecha y sin ceros del lado izquierdo por eso no pude utilizar Format(Cantidad,"0000000000000000")
bueno gracias amigos espero me puedan ayudar esta vez
Valora esta pregunta


0