附註: 如果 Microsoft Jet Expression Service 在沙箱模式中執行,會停用本主題中所述的函數、方法、物件或屬性,以免評估可能不安全的表達式。 如需沙盒模式的詳細資訊,請在 [說明] 中搜尋「沙盒模式」。

傳回包含以 輸入二進位 模式開啟之檔案之字元的字串。

語法

輸入 ( 編號, [# ] 檔案編號)

Input 函數語法具有下列自變數:

引數

描述

number

必要。 任何有效 數值運算式 指定要傳回的字元數。

filenumber

必要。 任何有效的 檔案編號。

註解

使用 輸入 函數讀取的數據通常會寫入使用 Print #Put 的檔案。 只有在以 輸入二進位 模式開啟檔案時,才使用此函數。

Input # 語句不同的是, Input 函數會傳回所讀取的所有字元,包括逗號、歸位字元、行feeds、雙引號和前置空格。

開啟二 進制 存取的檔案時,嘗試使用 輸入 函數讀取檔案,直到 EOF 傳回 True 為止 ,就會產生錯誤。 使用輸入讀取二進位檔時,或使用 EOF 函數使用 Get 時,請使用 LOFLoc 函數來取代 EOF

附註:  使用 InputB 函數處理文字檔中包含的位元組資料。 使用 InputB 時, number 會指定要傳回的位元組數,而不是要傳回的字元數。

範例

附註: 下列範例示範如何在 Visual Basic for Applications (VBA) 模組中使用此函數。 如需使用 VBA 的詳細資訊,請在 [搜尋] 旁的下拉式清單中選取 [開發人員參考],並在 [搜尋] 方塊中輸入一個或多個字詞。

此範例使用 輸入 函數一次從檔案朗讀一個字元,並將它列印到 [即時 ] 視窗。 此範例假設 TESTFILE 是含有幾行範例數據的文字檔。

Dim MyCharOpen "TESTFILE" For Input As #1    ' Open file.Do While Not EOF(1)    ' Loop until end of file.    MyChar = Input(1, #1)    ' Get one character.    Debug.Print MyChar  ' Print to the Immediate window.LoopClose #1    ' Close file.

Need more help?

Want more options?

探索訂閱權益、瀏覽訓練課程、瞭解如何保護您的裝置等等。

社群可協助您詢問並回答問題、提供意見反應,以及聆聽來自具有豐富知識的專家意見。