Share via


Reset 函式

更新:2007 年 11 月

關閉所有使用 FileOpen 函式開啟的磁碟檔案。

My 功能在檔案 I/O 作業中的產能和效能勝過 Reset。如需詳細資訊,請參閱 My.Computer.FileSystem 物件

Public Sub Reset()

備註

Reset 函式會關閉 FileOpen 函式開啟的所有作用中檔案,而且會與不含任何參數的 FileClose() 具有相同功能。

範例

這個範例會使用 Reset 函式來關閉所有開啟的檔案,並將所有檔案緩衝區的內容寫入磁碟中。請注意如何把 Object 變數 FileNumber 同時用來當做字串和數字。

' Open 5 files named TEST1, TEST2, etc.
Dim fileNumber As Integer
' Open 5 files.
For fileNumber = 1 To 5
   FileOpen(fileNumber, "TEST" & fileNumber, OpenMode.Output)
   PrintLine(fileNumber, "Hello World")
Next fileNumber
' Close files and write contents to disk.
Reset()

智慧型裝置開發人員注意事項

不支援這個函式。

需求

命名空間 (Namespace)︰Microsoft.VisualBasic

**模組︰**FileSystem

組件 (Assembly):Visual Basic Runtime Library (在 Microsoft.VisualBasic.dll 中)

請參閱

參考

FileClose 函式

End 陳述式

FileOpen 函式