Hàm FreeFile

Lưu ý: Hàm, phương pháp, đối tượng hoặc thuộc tính được mô tả trong chủ đề này bị tắt nếu dịch vụ biểu thức Microsoft Jet đang chạy trong chế độ sandbox, 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ế độ sandbox, hãy tìm kiếm "chế độ sandbox" trong trợ giúp.

Trả về số nguyên đại diện cho số tệp tiếp theo có sẵn để sử dụng bởi câu lệnh mở .

Cú pháp

Freefile[(rangenumber)]

Đối số rangenumber tùy chọn là một biến thể xác định phạm vi từ đó số tệp miễn phí tiếp theo sẽ được trả về. Xác định 0 (mặc định) để trả về một số tệp trong phạm vi 1 – 255, bao gồm. Xác định 1 để trả về một số tệp trong phạm vi 256 – 511.

Chú thích

Sử dụng Freefile để cung cấp một số tệp hiện không đượ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 có tiếp theo. Năm tệp được mở cho đầu ra trong vòng lặp và một số dữ liệu mẫu được viết cho từng bản ghi.

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

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

Phát triển kỹ năng Office của bạn
Khám phá nội dung đào tạo
Sở hữu tính năng mới đầu tiên
Tham gia Người dùng nội bộ Office

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

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

Cảm ơn bạn đã phản hồi! Để trợ giúp tốt hơn, có lẽ chúng tôi sẽ kết nối bạn với một trong những nhân viên hỗ trợ Office của chúng tôi.

×