COMBOBOX

USUARIO.EXCLUIDOS 17/12/2003 12:00:25
#1361
Alguém tem alguma rotina que consigo inserir os dados em uma Combo, importando os mesmos de um Arquivo TXT.
Ex: Quero inserir varios dados na combo, onde esses dados estão descritos em um arquivo.txt
USUARIO.EXCLUIDOS 17/12/2003 12:10:45
#1363 Resposta escolhida
Boa tarde...

é necessário ler o aquivo txt...

tenta assim

(Essa rotina vai ler linha a linha do arquivo txt, e adicioná-la no Combo)


Dim Linha as string 
Dim Arquivo as string 

Arquivo = CaminhoArquivo & NomeArquivo.txt

Open Arquivo For Input as #2

While not EOF(2)
     Line Input #2, Linha

     Combo.AddItem Linha

Wend
Close #2
Tópico encerrado , respostas não são mais permitidas
Voltar