|
|
|
|
|
|
|
|
Dicas
|
|
|
Visual Basic (Arquivos/Diretórios)
|
|
 |
Título da Dica: Enviar itens de um ListBox para um arquivo texto
|
 |
|
|
|
Postada em 27/1/2003 por Salgadinho
No general declarations...
Dim Arq as FreeFile
No evento desejado...
Arq = FreeFile
Open "Caminho\NomeArquivo.txt" For Output As Arq
For a = 0 To List1.ListCount - 1
Print #Arq, List1.List(a)
Next
Close Arq
List1.Clear
PS: neste caso toda vez que passa os itens do list pro arquivo texto o arquivo é limpado para depois receber os itens. Caso queira que continue escrevendo no arquivo à partir de onde parou troque o "Output" por "Append".
Bruno Salgado
|
|
|
|
|
