注: Microsoft Jet Expression Service がサンドボックス モードで実行されている場合 (安全でない可能性がある式の評価は行われません)、このトピックで説明する関数、メソッド、オブジェクト、またはプロパティは無効です。 サンドボックス モードの詳細については、ヘルプで "サンドボックス モード" を検索してください。
入力モードまたはバイナリ モードで開かれたファイルの文字を含む文字列を返します。
構文
Input( number, [# ] filenumber)
Input 関数の引数は次のとおりです。
引数 |
説明 |
number |
必須。 返す文字数を指定する任意の有効な数値式。 |
filenumber |
必須。 任意の有効なファイル番号。 |
解説
Input 関数によって読み取られたデータは、通常、Print # または Put でファイルに書き込まれます。 この関数は、入力モードまたはバイナリ モードで開かれているファイルでのみ使用します。
Input # ステートメントとは異なり、Input 関数は、コンマ、復帰、改行、引用符、先頭のスペースを含め、読み取ったすべての文字を返します。
バイナリ アクセス用に開かれたファイルでは、EOF が True を返すまで Input 関数を使用してファイルを読み取ろうとすると、エラーが生成されます。 Inputでバイナリ ファイルを読み取る場合は EOF の代わりに 関数と Loc 関数を使用し、EOF 関数を使用する場合は Get を使用します。
注: テキスト ファイルに含まれるバイト データに対しては、InputB 関数を使います。 InputB の number では、取得する文字数ではなく、取得するバイト数を指定します。
例
注: 次の例は、Visual Basic for Applications (VBA) モジュールでのこの関数の使用方法を示しています。 VBA の使用方法の詳細については、[検索] の横にあるドロップダウン リストで [開発者用リファレンス] を選び、検索ボックスに検索する用語を入力します。
この例では、Input 関数を使って一度に 1 文字をファイルから読み取り、Immediate ウィンドウに表示します。 この例では、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.