注意
如果 Microsoft Jet 運算式服務以沙箱模式執行,則會停用本主題中所述的函數、方法、物件或屬性,這會防止評估可能不安全的運算式。 如需沙箱模式的詳細資訊,請在說明中搜尋「沙箱模式」。
傳回字串,其中包含以 輸入 或 二進位 模式開啟的檔案中的字元。
語法
輸入 (編號, [# ] 檔案編號)
Input 函數語法具有下列引數:
| 引數 | 描述 |
|---|---|
| 數字 | 必要。 指定要傳回的字元數的任何有效數值運算式。 |
| 檔案編號 | 必要。 任何有效的檔案編號。 |
註解
使用 Input 函數讀取的資料通常會以 Print # 或 Put 寫入檔案。 僅在以 輸入 或 二進位 模式開啟的檔案時使用此函數。
與 Input # 陳述式不同, Input 函數會傳回它讀取的所有字元,包括逗號、歸位字元、換行符號、引號和前置空格。
開啟檔案以取得 二進位 存取時,嘗試使用 Input 函數讀取檔案直到 EOF 傳回 True 就會產生錯誤。 以 Input 讀取二進位檔案時,請使用 LOF 和 Loc 函數而非 EOF,或在使用 EOF 函數時使用 Get。
注意
針對文字檔中包含的位元組資料使用 InputB 函數。 使用 InputB 時, 數字 會指定要傳回的位元組數,而不是要傳回的字元數。
範例
注意
下列範例示範如何在 Visual Basic for Applications (VBA) 模組中使用此函數。 如需使用 VBA 的詳細資訊,請在 [搜尋] 旁的下拉式清單中選取 [開發人員參考],並在 [搜尋] 方塊中輸入一個或多個字詞。
此範例使用 Input 函數從檔案中一次讀取一個字元,並將其列印到 [立即 ] 視窗。 此範例假設這是一個 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.