共用方式為


FileSystem.FreeFile 方法

傳回 Integer 值,表示可供 FileOpen 函式使用的下一個可用的檔案編號。

命名空間: Microsoft.VisualBasic
組件: Microsoft.VisualBasic (在 microsoft.visualbasic.dll 中)

語法

'宣告
Public Shared Function FreeFile As Integer
'用途
Dim returnValue As Integer

returnValue = FileSystem.FreeFile
public static int FreeFile ()
public:
static int FreeFile ()
public static int FreeFile ()
public static function FreeFile () : int

傳回值

傳回 Integer 值,表示可供 FileOpen 函式使用的下一個可用的檔案編號。

備註

如需詳細資訊,請參閱 Visual Basic 的主題 FreeFile 函式

使用 FreeFile 來提供未使用的檔案號碼。

範例

此範例使用 FreeFile 函式傳回下一個可用的檔案編號。迴圈內的輸出開啟了五個檔案,而且某些範例資料會寫入每一個檔案中。

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

平台

Windows 98、 Windows 2000 SP4、 Windows Millennium Edition、 Windows Server 2003、 Windows XP Media Center Edition、 Windows XP Professional x64 Edition、 Windows XP SP2、 Windows XP Starter Edition

.NET Framework 並不支援各種平台的所有版本。如需支援平台版本的相關資訊,請參閱系統需求一節的內容。

版本資訊

.NET Framework

支援版本:2.0、1.1、1.0

請參閱

參考

FileSystem 類別
FileSystem 成員
Microsoft.VisualBasic 命名空間
IOException Class

其他資源

FreeFile 函式
FileOpen 函式
在 Visual Basic 中寫入檔案