Combo Box Com Lista De Arquivos

[Lindolpho Brandao]

Olá,

Estou tentando montar um aplicativo em VB6. Preciso que ao se acionar a seta da combo box, seja mostrada a lista de arquivos *.TXT de um determinado diretório. O arquivo quando selecionado pelo usuário torna-se passível de cópia para a área de transferência através doe click em botão de comando específico.

Agradeço se alguém puder me ajudar

[Graymalkin]

Se a dúvida é como obter uma listagem de arquivos, utilize a função Dir().

Abraços,

Graymalkin

[Lindolpho Brandao]

Obrigado por responder.

Infelizmente não sei como utilizar o comando Dir().

Teria jeito de você dar um exemplo de um script com este comando associado ao Combo Box ??

[Graymalkin]

Dir() é uma função, e se você procurar aqui no fórum (ou mesmo no Google) encontrará vários exemplos. Veja estes tópicos:

http://scriptbrasil.com.br/forum/index.php?showtopic=40804

http://scriptbrasil.com.br/forum/index.php?showtopic=72951

http://scriptbrasil.com.br/forum/index.php?showtopic=15595

Abraços,

Graymalkin

[Lindolpho Brandao]

Obrigado cara pela dica.

Olhei os três links referidos e um tinha o exemplo abaixo.

pasta = "d:\temp\"

arq = Dir(pasta, vbArchive)

Do While arq <> ""

Debug.Print arq

arq = Dir

Loop

Creio que vai ser útil. Me diga algo. Como faço para com este loop colocar cada um dos arquivos referidos na lista do combo box? Eu tentei utilizando o comando de atribuição de itens e mesmo no loop só o primeiro arquivo da lista foi parar no combo.

[Graymalkin]

Você tem que usar o método AddItem da ComboBox para adicionar um item. Colocando essa chamada dentro do loop todos os arquivos serão adicionados.

Abraços,

Graymalkin