次の方法で共有


FileSystem.FreeFile メソッド

定義

Integer 関数で使用できる次のファイル番号を表す FileOpen 値を返します。

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

戻り値

FileOpen 関数で使用できる次のファイル番号を表す整数値。

例外

使用中のファイルが 255 個を超えています。

この例では、 関数を FreeFile 使用して、次に使用可能なファイル番号を返します。 ループ内の出力用に 5 つのファイルが開かれ、一部のサンプル データがそれぞれに書き込まれます。

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

注釈

を使用して FreeFile 、まだ使用されていないファイル番号を指定します。

適用対象

こちらもご覧ください