Contents
Index 🔎︎

# Eof Function

파일 포인터가 파일 끝에 도달했는지 확인합니다.

## 구문:

    Eof (intexpression As Integer)

## 반환 값:

Bool

## 매개 변수:

Intexpression: 열린 파일의 번호로 평가되는 임의의 정수 식입니다.

파일의 끝을 지난 입력을 시도할 때 발생하는 오류를 방지하려면 EDF를 사용합니다. Input 또는 Get 문을 사용하여 파일에서 읽을 경우 읽은 바이트 수만큼 파일 포인터가 이동합니다. 파일의 끝에 도달하면 EOF는 "True"(-1) 값을 구합니다.

### Error codes:

5 잘못된 프로시저 호출입니다.

52 잘못된 파일 이름 또는 번호입니다.

## 예:

    Sub ExampleWorkWithAFile
    Dim iNumber As Integer
    Dim sLine As String
    Dim aFile As String
    Dim sMsg As String
        aFile = "c:\data.txt"
        iNumber = Freefile
        Open aFile For Output As #iNumber
        Print #iNumber, "First line of text"
        Print #iNumber, "Another line of text"
        Close #iNumber
        iNumber = Freefile
        Open aFile For Input As iNumber
        While Not eof(iNumber)
            Line Input #iNumber, sLine
            If sLine <>"" Then
                sMsg = sMsg & sLine & chr(13)
            End If
        Wend
        Close #iNumber
        MsgBox sMsg
    End Sub