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

 

  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
 


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