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 đại diện cho giá trị số tệp có sẵn để sử dụng bởi câu lệnh Open .
Cú pháp
FreeFile[(rangenumber)]
Đối số rangenumber tùy chọn là một Biến_thể chỉ rõ phạm vi mà số tệp miễn phí tiếp theo sẽ được trả về. Xác định số 0 (mặc định) để trả về số tệp trong phạm vi từ 1 đến 255, bao gồm cả 0 và 255. Xác định số 1 để trả về số tệp trong phạm vi 256 – 511.
Chú thích
Sử dụng FreeFile để cung cấp số tệp chưa được sử dụng.
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 FreeFile để trả về số tệp sẵn dùng tiếp theo. Năm tệp được mở để xuất trong vòng lặp và một số dữ liệu mẫu được ghi vào mỗi tệp.
Dim MyIndex, FileNumber
For MyIndex = 1 To 5 ' Loop 5 times. ' Get unused file number. FileNumber = FreeFile ' Create file name. Open "TEST" & MyIndex For Output As #FileNumber ' Output text. Write #FileNumber, "This is a sample." ' Close file. Close #FileNumber Next MyIndex