Module
Contents
Index 🔎︎

# Input# Statement

열린 순차 파일에서 데이터를 읽습니다.

## 구문:

Input #FileNumber As Integer; var1[, var2[, var3[,...]]]

## 매개 변수:

FileNumber: 읽을 데이터가 포함된 파일의 번호입니다. 파일은 Open 문에서 INPUT 키워드를 사용하여 열어야 합니다.

var: 열린 파일에서 읽은 값을 할당한 숫자 또는 문자열 변수입니다.

Input# 문은 열린 파일에서 숫자 값 또는 문자열을 읽은 다음 데이터를 하나 이상의 변수에 할당합니다. 숫자 변수는 첫 번째 캐리지 리턴(Asc=13), 줄 바꿈(Asc=10), 공백 또는 쉼표까지 읽습니다. 문자열 변수는 첫 번째 캐리지 리턴(Asc=13), 줄 바꿈(Asc=10) 또는 쉼표까지 읽습니다.

열린 파일의 데이터 및 데이터 형식은 "var" 매개 변수에서 전달되는 변수와 동일한 순서로 나타나야 합니다. 숫자가 아닌 값을 숫자 변수에 할당할 경우 "var"에 값 "0"이 할당됩니다.

쉼표로 구분된 레코드는 문자열 변수에 할당할 수 없습니다. 또한 파일의 따옴표(")도 무시됩니다. 이러한 문자를 파일에서 읽으려면 Line Input# 문을 사용하여 인쇄 가능 문자만 포함된 순수 텍스트 파일을 줄 단위로 읽습니다.

데이터 요소를 읽는 동안 파일 끝에 도달할 경우 오류가 발생하고 프로세스가 중단됩니다.

## 예:

    Sub ExampleWorkWithAFile

    Dim iCount As Integer

    Dim sName As String

    Dim sValue As Integer

    Dim sFileName As String

    sFileName = "c:\data.txt"

    iCount = Freefile

    ' Write data ( which we will read later with Input ) to file

    Open sFileName For Output As iCount

    sName = "Hamburg"

    sValue = 200

    Write #iCount, sName, sValue

    sName = "New York"

    sValue = 300

    Write #iCount, sName, sValue

    sName = "Miami"

    sValue = 459

    Write #iCount, sName, sValue

    Close #iCount

    iCount = Freefile

    ' Read data file using Input

    Open sFileName For Input As iCount

    Input #iCount; sName, sValue

    MsgBox sName & " " & sValue

    Input #iCount; sName, sValue

    MsgBox sName & " " & sValue

    Input #iCount; sName, sValue

    MsgBox sName & " " & sValue

    Close #iCount

    End Sub