ola pessoal estou usando este codigo pra gerar um .TXT
Open "C:Teste.txt" For Output As #1
Print #1, "Codigo", "Nome", "Valor"
Print #1,
Set Rs = bd.OpenRecordset("tb1", dbOpenTable)
Do While Not Rs.EOF
Print #1, Rs.Fields("codigo"); vbTab; Rs.Fields("nome"); vbTab; Rs.Fields("valor")
Rs.MoveNext
Loop
Close #1
MsgBox "TXT Criado com sucesso."
ate ai bl ele gera normal o TXT mas o problema ta nas colunas
Veja como fica:
Codigo Nome Valor
1 adriu de oliveira 200
2 adrianu 300
3 belet 400
4 betoco 500
5 bil 600
Como faço pro conteudo do nome ou de um outro campo nao execer em cima do outro e ajustar a coluna direitinhopelo tamanho do campo?
pra ficar assim:
Codigo Nome Valor
1 adriu de oliveira 200
2 adrianu 300
3 belet 400
4 betoco 500
5 bil 600