附註: 如果 Microsoft Jet Expression Service 在沙箱模式中執行,會停用本主題中所述的函數、方法、物件或屬性,以免評估可能不安全的表達式。 如需沙盒模式的詳細資訊,請在 [說明] 中搜尋「沙盒模式」。
傳回包含以 輸入 或 二進位 模式開啟之檔案之字元的字串。
語法
輸入 ( 編號, [# ] 檔案編號)
Input 函數語法具有下列自變數:
引數 |
描述 |
number |
必要。 任何有效 數值運算式 指定要傳回的字元數。 |
filenumber |
必要。 任何有效的 檔案編號。 |
註解
使用 輸入 函數讀取的數據通常會寫入使用 Print # 或 Put 的檔案。 只有在以 輸入 或 二進位 模式開啟檔案時,才使用此函數。
與 Input # 語句不同的是, Input 函數會傳回所讀取的所有字元,包括逗號、歸位字元、行feeds、雙引號和前置空格。
開啟二 進制 存取的檔案時,嘗試使用 輸入 函數讀取檔案,直到 EOF 傳回 True 為止 ,就會產生錯誤。 使用輸入讀取二進位檔時,或使用 EOF 函數使用 Get 時,請使用 LOF 和 Loc 函數來取代 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.