Seek 함수

참고: 사용자 언어로 가능한 한 빨리 가장 최신의 도움말 콘텐츠를 제공하고자 합니다. 이 페이지는 자동화를 통해 번역되었으며 문법 오류나 부정확한 설명을 포함할 수 있습니다. 이 목적은 콘텐츠가 사용자에게 유용하다는 것입니다. 이 페이지 하단의 정보가 도움이 되었다면 알려주세요. 쉽게 참조할 수 있는 영어 문서가 여기 있습니다.

참고: Microsoft Jet 식 서비스를 안전 하지 않은 식 평가 하면 sandbox 모드에서 실행 중인 경우 함수, 메서드, 개체 또는이 항목에 설명 된 속성 비활성화 됩니다. Sandbox 모드에 대 한 자세한 내용은 도움말에서 "sandbox 모드"에 대 한 검색 합니다.

Open 문을 사용 하 여 연 파일 내에서 현재 읽기/쓰기 위치를 지정 하는 Long 데이터 형식을 반환 합니다.

구문

Seek ( filenumber )

필요한 filenumber인수 유효한 파일 번호 를 포함 하는 정수입니다.

주의

Seek 1과 2147483647 사이의 값을 반환 합니다 (2 ^31-1).

다음은 각 파일 액세스 모드에 대 한 반환 값에 대 한 설명입니다.

Mode

반환 값

임의의

읽기 또는 쓰기 다음 레코드의 번호

이진,
출력
추가,
입력

다음 연산이 실행 되는 바이트 위치입니다. 파일에 있는 첫 번째 바이트는 위치 1, 두 번째 바이트는 2, 위치입니다.


예제

참고: VBA(Visual Basic for Applications) 모듈에서 이 함수를 사용하는 경우를 예로 들어 보겠습니다. VBA 사용에 대해 자세히 알아보려면 검색 옆의 드롭다운 목록에서 개발자 참고를 선택하고 검색 상자에 검색어를 하나 이상 입력하세요.

이 예제에서는 Seek 함수를 사용 하 여 현재 파일 위치를 반환 합니다. 이 예제에서는 TESTFILE 사용자 정의 형식 Record레코드가 포함 된 파일은 가정 합니다.

Type Record    ' Define user-defined type.
ID As Integer
Name As String * 20
End Type

Seek 임의 모드에서 연 파일에 대 한 다음 레코드의 수를 반환 합니다.

Dim MyRecord As Record    ' Declare variable.
Open "TESTFILE" For Random As #1 Len = Len(MyRecord)
Do While Not EOF(1) ' Loop until end of file.
Get #1, , MyRecord ' Read next record.
' Print record number to the Immediate window.
Debug.Print Seek(1)
Loop
Close #1 ' Close file.

Seek 를 임의 모드 이외의 모드에서 연 파일에 대 한 다음 연산이 실행 되는 바이트 위치를 반환 합니다. TESTFILE 몇 줄의 텍스트를 포함 하는 파일은 가정 합니다.

Dim MyChar
Open "TESTFILE" For Input As #1 ' Open file for reading.
Do While Not EOF(1) ' Loop until end of file.
MyChar = Input(1, #1) ' Read next character of data.
' Print byte position to the Immediate window.
Debug.Print Seek(1)
Loop
Close #1 ' Close file.
Office 기술 확장
교육 살펴보기
새로운 기능 우선 가져오기
Office Insider 참여

이 정보가 유용한가요?

의견 주셔서 감사합니다!

피드백을 주셔서 감사합니다. Office 지원 에이전트와 연락하는 것이 도움이 될 것 같습니다.

×