USUÁRIO:      SENHA:        SALVAR LOGIN ?    Adicione o VBWEB na sua lista de favoritos   Fale conosco 

 

  Fórum

  Visual Basic
Voltar
Autor Assunto:  alinhar arquivo testo
Aginaldo
JUIZ DE FORA
MG - BRASIL
ENUNCIADA !
Postada em 12/03/2008 18:00 hs            
uso esta linha de comando para gerar um arquivo testo
 
TEXTO.Write XTBGET!codigoprod & "   " & XTBGET!FABRICANTE & "   " & XTBGET!PRODUTO & "   " & XTBGET!U_MEDIDA & "     " & XTBGET!qtd_mat & separarqtdmat & XTBGET!qtd_loja & separarqtdloja & XTBGET!est_ideal & separarestideal & XTBGET!TOTAL & "   " & vbCrLf
 
so que quando o arquivo testo e gerado ele ainha a esquerda por exemplo
 
1,00
1,008
eu gostaria que alinhasse a direita 
alguem pode me ajudar 
   
Tiranossauro
DOIS IRMÃOS
RS - BRASIL
ENUNCIADA !
Postada em 12/03/2008 21:32 hs            
supondo que a tabela tenha apenas um campo:
Codigo = 1
Codigo = 10
Codigo = 100
Codigo = 1000
 
TEXTO.write space(6 - len(Format(Codigo, "0"))) & Codigo
 
Após o space vc insere qual será o tamanho do campo código no relatório, no caso defini que teria 6 posições então, como o numérico alinha à esquerda então imprimi Space 6 - o comprimento do campo código e depois o campo código totalizando seis posições.
 
Para campos alfanuméricos a operação é inversa, imprime-se primeiro o campo da tabela e depois o spaces descontando o tamanho do campo.
 
Deste modo fica tudo alinhado.
 
Vc pode ter problemas se imprimir na tela quando utilizar uma fonte arial por exemplo, porque ela é uma fonte proporcional. Então deve experimentar uma fonte Courier New que tem a mesma largura para todos os caracteres e não as outras que são proporcionais ao tamanho dos caracteres.
 
Não sei se ajudou .. mas ... boa sorte
   
Página(s): 1/1    


Seu Nome:

Seu eMail:

ALTERAR PARA MODO HTML
Mensagem:

[:)] = 
[:P] = 
[:(] = 
[;)] = 

HTML DESLIGADO

     
 VOLTAR

  



CyberWEB Network Ltda.    © Copyright 2000-2024   -   Todos os direitos reservados.
Powered by HostingZone - A melhor hospedagem para seu site
Topo da página