Bỏ qua để tới nội dung chính
Đăng nhập với Microsoft
Đăng nhập hoặc tạo một tài khoản.
Xin chào,
Chọn một tài khoản khác.
Bạn có nhiều tài khoản
Chọn tài khoản bạn muốn đăng nhập.

Lưu ý: Hàm, phương pháp, đối tượng hoặc thuộc tính được mô tả trong chủ đề này sẽ bị vô hiệu hóa nếu Dịch vụ Biểu thức Phản lực của Microsoft đang chạy trong chế độ hộp cát, điều này ngăn không cho đánh giá các biểu thức không an toàn tiềm ẩn. Để biết thêm thông tin về chế độ hộp cát, hãy tìm kiếm "chế độ hộp cát" trong Trợ giúp.

Trả về một Số nguyên chứa giá BooleanTrue khi đã đạt đến cuối tệp được mở cho Đầu vào Ngẫu nhiên hoặc tuần tự.

Cú pháp

EOF( filenumber )

Số tệp bắt buộctham đối là một Số nguyên chứa bất kỳ số nguyên hợp lệ số tệp.

Chú thích

Sử dụng EOF để tránh lỗi được tạo ra bằng cách tìm cách đưa đầu vào qua phần cuối của tệp.

Hàm EOF trả về False cho đến khi đạt đến cuối tệp. Với các tệp được mở cho truy nhập Ngẫunhiên hoặc Nhị phân, EOF trả về False cho đến khi câu lệnh Get được thực hiện cuối cùng không thể đọc toàn bộ bản ghi.

Với các tệp được mở cho Truy nhập nhị phân, một nỗ lực để đọc qua tệp bằng cách sử dụng hàm Input cho đến khi hàm EOF trả về True sẽ tạo ra lỗi. Sử dụng các hàm LOFvà Loc thay vì EOF khi đọc tệp nhị phân bằng Input hoặc sử dụng Get khi sử dụng hàm EOF . Với các tệp được mở cho Đầu ra, EOF luôn trả về True.

Ví dụ

Lưu ý: Các ví dụ sau thể hiện cách sử dụng hàm này trong mô-đun Visual Basic for Applications (VBA). Để biết thêm thông tin về cách làm việc với VBA, chọn Tham khảo dành cho Nhà phát triển trong danh sách thả xuống cạnh Tìm kiếm, rồi nhập một hoặc nhiều từ vào hộp tìm kiếm.

Ví dụ này sử dụng hàm EOF để phát hiện phần cuối của tệp. Ví dụ này giả MYFILE là tệp văn bản có một vài dòng văn bản.

Dim InputData
' Open file for input.
Open "MYFILE" For Input As #1
' Check for end of file.
Do While Not EOF(1)
' Read line of data.
Line Input #1, InputData
' Print to the Immediate window.
Debug.Print InputData
Loop
' Close file.
Close #1

Bạn cần thêm trợ giúp?

Bạn muốn xem các tùy chọn khác?

Khám phá các lợi ích của gói đăng ký, xem qua các khóa đào tạo, tìm hiểu cách bảo mật thiết bị của bạn và hơn thế nữa.

Cộng đồng giúp bạn đặt và trả lời các câu hỏi, cung cấp phản hồi và lắng nghe ý kiến từ các chuyên gia có kiến thức phong phú.

Thông tin này có hữu ích không?

Bạn hài lòng đến đâu với chất lượng dịch thuật?
Điều gì ảnh hưởng đến trải nghiệm của bạn?
Khi nhấn gửi, phản hồi của bạn sẽ được sử dụng để cải thiện các sản phẩm và dịch vụ của Microsoft. Người quản trị CNTT của bạn sẽ có thể thu thập dữ liệu này. Điều khoản về quyền riêng tư.

Cảm ơn phản hồi của bạn!

×