FileSystem.FreeFile Método

Referencia

Definición

Espacio de nombres:: Microsoft.VisualBasic

Ensamblado:: Microsoft.VisualBasic.Core.dll

Ensamblado:: Microsoft.VisualBasic.dll

Source:: FileSystem.vb

Source:: FileSystem.vb

Source:: FileSystem.vb

Importante

Parte de la información hace referencia a la versión preliminar del producto, que puede haberse modificado sustancialmente antes de lanzar la versión definitiva. Microsoft no otorga ninguna garantía, explícita o implícita, con respecto a la información proporcionada aquí.

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.

Se aplica a

Compartir vía