Boa Noite.

 

Preciso saber como forço o preenchimento de um arquivo com a quantidade de caracteres q eu quero ? Exemplo tenho um codigo que está com 3 campos. Mas preciso que no arquivo ele vé com 6, sendo completado com 3 zeros antes. Entao seria 000123.

 

Alguem me ajuda ?

 

Abração.

Do Until Len(arquivo) < 3

arquivo = "0" + arquivo
Loop

 

+ ou - isso

VAMOS SUPOR QUE VOCÊ TENHA UM TEXTBOX PARA INSERIR OS NUMERO E UM LABEL QUE IRÁ EXIBIR ESTE NUMERO FORMATADO

 

INCLUA UM BOTÃO NO SEU FORM

 

E COLE ESTE CÓDIGO

 

PRIVATE SUB COMMAND1_CLICK()

label1.caption=format(text1.text,"000000")

END SUB

 

pronto é o basico do basico