Print、PrintLine 函式
更新：2007 年 11 月
將顯示格式化的資料寫入循序檔中。
Public Sub Print( _
ByVal FileNumber As Integer, _
ByVal ParamArray Output() As Object _
)
' -or-
Public Sub PrintLine( _
ByVal FileNumber As Integer, _
ByVal ParamArray Output() As Object _
)
參數
FileNumber
必要項。任何有效的檔案號碼。Output
選擇項。以零或多個逗號分隔而寫入檔案的運算式。Output 引數設定如下：
設定 |
描述 |
|---|---|
SPC(n) |
用於在輸出中插入空白字元，其中的 n 表示要插入的空白字元數。 |
TAB(n) |
用於將插入點定位於絕對的資料行數，其中的 n 表示資料行數。您可使用沒有引數的 TAB，將插入點定位於下一個列印區的開始處。 |
expression |
要列印的數值運算式或字串運算式。 |
例外狀況
例外狀況類型 |
錯誤代碼 |
條件 |
|---|---|---|
檔案模式無效。 |
||
FileNumber 不存在。 |
如果將使用非結構化錯誤處理的 Visual Basic 6.0 應用程式升級，請參閱「錯誤代碼」資料行 (您可以將錯誤代碼與 Number 屬性 (Err 物件) 比對)。但是，請盡可能考慮以 Visual Basic 的結構化例外處理概觀 取代這類錯誤控制項。
備註
Print 和 PrintLine 函式會提供給回溯相容性，而且可能會影響效能。對於非舊版應用程式，My.Computer.FileSystem 物件會提供更好的效能。如需詳細資訊，請參閱使用 Visual Basic 存取檔案。
Print 不會在行尾包含換行字元。不過，PrintLine 會包含換行字元。
以 Print 寫入的資料，通常是用 LineInput 或 Input 自檔案中讀取的。
如果您省略了 PrintLine 的 Output，會在檔案中列印空白行。如果省略的是 Print，則不會產生任何輸出。以逗號分隔的多個運算式將會在索引標籤界限上對齊，但是混和逗號和 TAB 則可能會產生不一致的結果。
對於 Boolean 資料，會印出 True 或 False。不論地區設定為何，True 和 False 關鍵字都不會進行轉譯。
會使用系統能夠辨識的標準簡短日期格式將日期資料寫入檔案中。當日期或時間元件遺漏或為零時，只會寫入所提供的部分。
如果 Output 資料是空的，就不會將任何資料寫入檔案中。但是，如果 Output 的清單資料是 DBNull，便會將 Null 寫入檔案中。
對於 Error 資料，輸出將出現為 Error errorcode。不論地區設定為何，都不會轉譯 Error 關鍵字。
所有使用 Print 寫入檔案中的資料都是國際感知的，也就是說，這些資料都使用適當的小數點分隔符號加以格式化。如果使用者希望在多個地區設定中使用輸出資料，應該使用 Write。
使用 Print 或 PrintLine 函式寫入檔案時，需要 FileIOPermissionAccess 列舉型別的 Write 存取權限。如需詳細資訊，請參閱 FileIOPermissionAccess 列舉型別。
範例
這個範例會使用 Print 和 PrintLine 函式，將資料寫入檔案中。
FileOpen(1, "c:\trash.txt", OpenMode.Output) ' Open file for output.
Print(1, "This is a test.") ' Print text to file.
PrintLine(1) ' Print blank line to file.
PrintLine(1, "Zone 1", TAB(), "Zone 2") ' Print in two print zones.
PrintLine(1, "Hello", "World") ' Separate strings with a tab.
PrintLine(1, SPC(5), "5 leading spaces ") ' Print five leading spaces.
PrintLine(1, TAB(10), "Hello") ' Print word at column 10.
' Assign Boolean, Date, and Error values.
Dim aBool As Boolean
Dim aDate As DateTime
aBool = False
aDate = DateTime.Parse("February 12, 1969")
' Dates and booleans are translated using locale settings of your system.
PrintLine(1, aBool, " is a Boolean value")
PrintLine(1, aDate, " is a date")
FileClose(1) ' Close file.
智慧型裝置開發人員注意事項
不支援這個函式。
需求
**模組︰**FileSystem
組件：Visual Basic Runtime Library (在 Microsoft.VisualBasic.dll 中)
請參閱
工作
HOW TO：在 Visual Basic 中將文字寫入檔案
HOW TO：在 Visual Basic 中以 StreamWriter 將文字寫入檔案