FileSystem.FreeFile Método

Definição

Namespace:

Microsoft.VisualBasic

Assembly:

Microsoft.VisualBasic.Core.dll

Origem:

FileSystem.vb

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.

Confira também

• FileOpen(Int32, String, OpenMode, OpenAccess, OpenShare, Int32)
• IOException
• Gravando em arquivos no Visual Basic