Sign in with Microsoft
Sign in or create an account.
Hello,
Select a different account.
You have multiple accounts
Choose the account you want to sign in with.

附註: 如果 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 MyChar
Open "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.
Loop
Close #1 ' Close file.

Need more help?

Want more options?

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

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

Was this information helpful?

How satisfied are you with the translation quality?
What affected your experience?
By pressing submit, your feedback will be used to improve Microsoft products and services. Your IT admin will be able to collect this data. Privacy Statement.

Thank you for your feedback!

×