Cita:
Iniciado por german_martin 
Buenos dias y gracias
Tengo un contador en un bucle, el cual va sumando un 1 por cada vuelta que da ( Contador = contador + 1) . Cuando llega a la vuelta cinco se imprime en un Richtexbox ( RichText1.text = Contador ) con lo cual me quedaria Richtext1.text = 5
Necesito agregarle ceros delante del 5, para que se muestre ordenado en el Richtextbox de manera que quede Richtext1.text = 0005
Espero haberme explicado bien
Muchas gracias a todos!!
Buenos dias,
eso es bastante sencillo con la función Format
Dim ElNumero As String
ElNumero = Format(contador, "00000")
La cantidad de ceros que pongas en el segundo parámetro va a ser la longitud de la variable ElNumero.
