FileSystem.FreeFile Método

Definición

Espacio de nombres:

Microsoft.VisualBasic

Ensamblado:

Microsoft.VisualBasic.Core.dll

Source:

FileSystem.vb

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

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 la función FileOpen.

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. Se abren cinco archivos para la salida dentro del bucle y se escriben algunos datos de ejemplo 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.

Consulte también

• FileOpen(Int32, String, OpenMode, OpenAccess, OpenShare, Int32)
• IOException
• Escribir en archivos en Visual Basic