Visual Basic - COMO RELLENAR UNA CADENA

Life is soft - evento anual de software empresarial
 
Vista:

COMO RELLENAR UNA CADENA

Publicado por Juan (31 intervenciones) el 19/06/2002 08:25:49
Alguien sabe como rellenar una cadena por la izquierda con algún carácter?

Por ejemplo si yo escribor "12" que se me ponga "00000012"

Se rellena con ceros.
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder
sin imagen de perfil

RE:COMO RELLENAR UNA CADENA

Publicado por Iñaki (502 intervenciones) el 19/06/2002 08:48:31
De esta forma :
dim micadena as string
minumero=12
micadena = Format ( minumero, " 000000000 " )
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

RE:COMO RELLENAR UNA CADENA

Publicado por Richi317 (95 intervenciones) el 19/06/2002 12:01:04
Otra forma sería la siguiente:
Si quieres añadir seis ceros:
"000000" & minumero

Si minumero=12, quedaría "00000012"
Si mi numero=123,quedaría "000000123"

Ambos tienen distinta longitud. Si quieres anteponer tantos ceros como necesites para que la cadena tenga siempre el mismo número de caracteres, pongamos 8, por ejemplo:

micadena = minumero
iCaracteres = 8-len(micadena)
for i=1 to iCeros
micadena = "0" & micadena
next i
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

RE:COMO RELLENAR UNA CADENA

Publicado por Juan (31 intervenciones) el 20/06/2002 08:27:45
No hay ninguna instruccion como en Visual FoxPro como por ejemplo
PADL(Numero,'0',6)
rellena de ceros hasta que Numero tenga una longitud de 6 caracteres.
No entiendo como me lo explicais me lo podeis poner mas sencillo?

Gracias
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar