Os desenvolvedores devem verificar a existência de um arquivo antes de tentar manipulá-lo . Se um programador tenta usar um arquivo que não está presente , um aplicativo pode falhar ou gerar resultados imprecisos . VB6 , também conhecido como Visual Basic 6, não tem uma função chamada "Veja se esse arquivo existe. " No entanto, ele não permite que você detectar a presença de qualquer arquivo em um computador usando um método indireto . Instruções
1

Inicie o aplicativo VB6 e pressione " Ctrl" e "N" para abrir a janela "New Project " .
2

Clique duas vezes "EXEC Padrão " para criar um novo projeto. VB6 exibe um formulário vazio na sua janela de edição.
3

Dê um duplo clique no botão "Command ", localizado na caixa de ferramentas para colocá-lo no formulário.
4 < . p> botão direito do mouse nesse botão e clique em " View Code" para visualizar a janela de código
5

Coloque o seguinte código antes da instrução " End Sub " que você vê no código :

Dim fileToCheck As String Dim

fileExists as boolean

Dim directoryName As String

Este código define três variáveis. A variável " fileToCheck " contém o nome do arquivo cuja existência você deseja detectar. A variável " fileExists " segura "Verdadeiro" ou "Falso" , dependendo se o arquivo existe. VB6 armazena o nome do diretório do arquivo na variável denominada " directoryName " se o arquivo existe
6

Coloque o seguinte código abaixo o código listado na etapa anterior : .

FileToCheck = " C \\: SomeFolder \\ arquivo.txt "

directoryName = Dir ( fileToCheck )

Se directoryName =" "Then

fileExists = False

Else

fileExists = True End If

MsgBox fileExists

Substitua "C: \\ SomeFolder \\ arquivo.txt ", com o nome completo do caminho do arquivo que você deseja verificar. Por exemplo, se você quiser ver se um arquivo chamado " music.jpg " existe em uma pasta chamada " mídia" na sua unidade "D" , substitua "C: \\ SomeFolder \\ arquivo.txt " com "D: \\ Media \\ music.jpg ". A próxima linha de código executa a função " Dir " . Ele examina o valor de " fileToCheck ". Se o comando " Dir " encontra o arquivo especificado , ele armazena seu nome do diretório na variável denominada " directoryName ". Caso contrário , ele armazena um valor vazio .
7

Pressione " F5" para executar o aplicativo . Quando o formulário for exibido, clique no botão . O código é executado , e uma caixa de mensagem exibe "Verdadeiro" se o ficheiro que verificada a existência . Se esse arquivo não existir , a caixa de mensagem exibe " False. "