FileSystem.FreeFile Método

Referência

Definição

Namespace:: Microsoft.VisualBasic

Assembly:: Microsoft.VisualBasic.Core.dll

Assembly:: Microsoft.VisualBasic.dll

Origem:: FileSystem.vb

Origem:: FileSystem.vb

Origem:: FileSystem.vb

Importante

Algumas informações se referem a produtos de pré-lançamento que podem ser substancialmente modificados antes do lançamento. A Microsoft não oferece garantias, expressas ou implícitas, das informações aqui fornecidas.

Retorna um valor Integer que representa o próximo número de arquivo disponível para uso pela função FileOpen.

public:
 static int FreeFile();

public static int FreeFile ();

static member FreeFile : unit -> int

Public Function FreeFile () As Integer

Retornos

Int32

Um valor inteiro que representa o próximo número de arquivo disponível para uso pela função FileOpen.

Exceções

IOException

Mais de 255 arquivos estão em uso.

Exemplos

Este exemplo usa a FreeFile função para retornar o próximo número de arquivo disponível. Cinco arquivos são abertos para saída dentro do loop e alguns dados de exemplo são gravados em cada um.

Dim count As Integer
Dim fileNumber As Integer
For count = 1 To 5
    fileNumber = FreeFile()
    FileOpen(fileNumber, "TEST" & count & ".TXT", OpenMode.Output)
    PrintLine(fileNumber, "This is a sample.")
    FileClose(fileNumber)
Next

Comentários

Use FreeFile para fornecer um número de arquivo que ainda não está sendo usado.

Aplica-se a

Partilhar via