Completando valor com Zeros

[lordstarlight 0]

Olá Pessoal,

 

Gostaria de saber que função completa uma sequência de números com "0" (zero).

Exemplo: o usuário digita "10" mas me retorna "00010".

Quero que aparece 5 dígitos.

 

 

Valeu http://forum.imasters.com.br/public/style_emoticons/default/joia.gif

[Weverton N 0]

Poe essa function ae:function ColocaZero(valor)Select Case len(valor)Case 1valor="0000"&valorCase 2valor="000"&valorCase 3valor="00"&valorCase 4valor="0"&valorend selectColocaZero=valorend functionValorFinal=ColocaZero("meuvalor")

[Morris Ruschel 0]

Dah uma olhada neste tópico...

é uma função pra completar...

 

http://forum.imasters.com.br/index.php?showtopic=186215

 

ok....

[Mário Monteiro 179]

no caso o melhor seria mesmo usar uma função recursiva mas o que o Weverton N passou funcionaria muito bem

[lordstarlight 0]

Ok Beleza, mas se for em uma sessão do tipo"&ssession("valor")&"como arrumo isso:

[Marcelo Barcellos 0]

Colega...

Que tal

var = Right("0000" & variavel,4)