FileSystem.FreeFile Método
Definição
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
Um valor inteiro que representa o próximo número de arquivo disponível para uso pela função FileOpen
.
Exceções
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.