USUÁRIO:
SENHA:
SALVAR LOGIN ?
Fórum
Visual Basic
Responder
Voltar
Autor
Assunto:
Zeros a esquerda
FKNMALTA
FRANCA
SP - BRASIL
ENUNCIADA !
Postada em 16/04/2008 21:29 hs
COMO FAÇO PARA QUE UM CAMPO DA TABELA SAIA COM ZEROS A ESQUERDA, O FORMATO DO CAMPO TEM QUE SAIR ###########.##, EX:
se for 100,00 -> 00000000100.00
se for 1000,00 -> 00000001000.00
estou usando assim para gerar:
Print #1, rdcli!nota;
rdcli!valor
;""
Ama
UBERLÂNDIA
MG - BRASIL
ENUNCIADA !
Postada em 17/04/2008 00:32 hs
faça o tipo do field como texto de tamanho limitado depois na operaçao salvar faça rdcli!valor=format$(strvalor,"00000000000.00") onde strvalor é do tipo string
JOM
BOM JESUS DA LAPA
BA - BRASIL
ENUNCIADA !
Postada em 18/04/2008 21:36 hs
+ ou - , digamos que queira que o campo tenha sempre o tamanho 14, como vc colocou no exemplo, então escolha o evento e adapte o seguinte:
Do Until Len(Text1.Text) = 14 'enquanto o campo não tiver 14 caracteres
Text1.Text = "0" + Text1.Text 'insira zeros a esquerda até ficar com 14 caracteres
Loop
FKNMALTA
FRANCA
SP - BRASIL
ENUNCIADA !
Postada em 21/04/2008 23:49 hs
Blz valew Ama e Jom os dois jeitos deram certo!!!
Página(s): 1/1
CyberWEB Network Ltda. © Copyright 2000-2024 - Todos os direitos reservados.
Powered by
HostingZone -
A melhor hospedagem para seu site