Share via


Como: Determinar como vários arquivos estão em um diretório no Visual Basic

Você pode usar o Método My.Computer.FileSystem.FindInFiles para retornar uma coleção de sequências de caracteres apenas para leitura que representa os nomes dos arquivos no diretório especificado.Em seguida, você pode usar a propriedade Count para determinar o número de arquivos.

Para determinar o número de arquivos em um diretório

  1. Use o método GetFiles para retornar a coleção de arquivos no diretório especificado.Este exemplo retorna os arquivos no diretório chamado TestDir.

    Dim counter As _
    System.Collections.ObjectModel.ReadOnlyCollection(Of String)
    counter = My.Computer.FileSystem.GetFiles("C:\TestDir")
    
  2. Use a propriedade Count para determinar o número de arquivos na coleção.Este exemplo exibe o resultado em uma caixa de mensagem.

    MsgBox("number of files is " & CStr(counter.Count))
    

Exemplo

Este exemplo, que apresenta o trecho acima no formato completo, conta o número de arquivos em TestDir e o informa em uma caixa de mensagem.

Dim counter As _
System.Collections.ObjectModel.ReadOnlyCollection(Of String)
counter = My.Computer.FileSystem.GetFiles("C:\TestDir")
MsgBox("number of files is " & CStr(counter.Count))

Compilando o código

Este exemplo requer:

  • Acesso aos membros do espaço de nomes System.Collections.Adicione uma declaração Imports se você não está qualificando completamente os nomes de membros em seu código.Para obter mais informações, consulte Declaração Imports (Tipo e Namespace .NET).

  • Um diretório chamado TestDir na localidade especificada.Substitua o caminho pelo caminho do diretório que deseja examinar.

Programação robusta

As seguintes condições podem causar uma exceção:

  • O caminho inválido para um dos seguintes motivos: Ele é uma cadeia de comprimento zero, ele contém somente espaços em branco, ele contém caracteres inválidos ou é um caminho de dispositivo (começa com \\.\) (ArgumentException).

  • O caminho não é válido porque ele é Nothing (ArgumentNullException).

  • O diretório não existe ou é um arquivo (DirectoryNotFoundException).

  • directory aponta para um arquivo existente (IOException).

  • O caminho excede o comprimento máximo definido pelo sistema (PathTooLongException).

  • Um arquivo ou nome da pasta no caminho contém dois-pontos (:) ou está em formato inválido (NotSupportedException).

  • O usuário não possui permissões necessárias para exibir o caminho (SecurityException).

  • O usuário não possui as permissões necessárias (UnauthorizedAccessException).

Consulte também

Tarefas

Como: Obtenha a coleção de arquivos em um diretório no Visual Basic

Como: Localizar arquivos com um padrão específico no Visual Basic

Referência

Método My.Computer.FileSystem.FindInFiles

Outros recursos

Propriedades de arquivo, diretório e unidade no Visual Basic