Input

---

構文

Input(num,[#]filenumber)

引数numには、ファイルから読み込む文字数を表す数式を指定します。

引数filenumberには、対象となるファイルのファイル番号を指定します。

解説

シーケンシャル入力モードまたはバイナリモードで開いたファイルから、指定した文字数の文字列を読み込み文字列型の値を返します。

Input関数でファイル内の文字を読み込むと、ファイルの読込位置は読み込んだデータの次に移動します。

サンプル

次の例は、ＣドライブにTmp.txtを作成しInput関数で３文字を読み込みます。最初のInput関数は「123」を、次のInput関数は「ABC」を返します。

Sub Sample()
    Dim buf As String
    Open "c:\tmp.txt" For Output As #1
        Print #1, "123ABC456DEF"
    Close #1
    Open "c:\tmp.txt" For Input As #1
        buf = Input(3, 1)
        MsgBox buf
        buf = Input(3, 1)
        MsgBox buf
    Close #1
End Sub