Boa tarde...Feliz ano novo a todos....

 

Como eu faço pra imprimir ou exibir linha por linha de um arquivo texto?

 

Obrigado

Olá DelSF,

 

tente isso:

 

Dim Linha as String

 

Open <SeuArquivo> For input As #1

 

Do While Not Eof(1)

    Line Input #1, Linha

   

    List1.AddItem Linha

Loop

 

Close #1

 

Neste exemplo, você está abrindo o arquivo texto e inserindo linha a linha em uma listbox. Você pode mandar para a impressora usando Printer.Print Linha, ou Print #, se abrir a impressora como se fosse um outro arquivo.

 

Obrigado Sandro deu certo....mas e seu eu quiser ler, exibir ou imprimir uma determinada linha, ir direto na linha desejada....tem alguma função semelhante ao memoline do clipper?

 

vlw