FileSystem.FreeFile Método

Definición

Espacio de nombres:
Microsoft.VisualBasic
Ensamblado:
Microsoft.VisualBasic.dll

Devuelve un Integer valor que representa el siguiente número de archivo disponible para su uso por parte de la FileOpen función .

public:
 static int FreeFile();
public static int FreeFile();
static member FreeFile : unit -> int
Public Function FreeFile () As Integer

Devoluciones

Int32

Valor entero que representa el siguiente número de archivo disponible para su uso por parte de la FileOpen función.

Excepciones

IOException

Hay más de 255 archivos en uso.

Ejemplos

En este ejemplo se usa la FreeFile función para devolver el siguiente número de archivo disponible. Cinco archivos se abren para la salida dentro del bucle, y algunos datos de muestra se escriben en cada uno.

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

Comentarios

Use FreeFile para proporcionar un número de archivo que aún no se esté usando.

Se aplica a

Consulte también