Applies ToAccess для Microsoft 365 Access 2021 Access 2019 Access 2016

Примітка.: Функція, метод, об’єкт або властивість, описана в цьому розділі, недоступна, якщо Microsoft Jet Expression Service працює в режимі ізольованого програмного середовища, що запобігає обчисленню потенційно небезпечних виразів. Щоб отримати докладні відомості про режим ізольованого програмного середовища, у вікні довідки шукайте за запитом "режим ізольованого програмного середовища".

Повертає ціле число, яке позначає наступне номер файлу, доступне для використання оператором Open .

Синтаксис

FreeFile[(діапазон_число)]

Необов'язковий аргумент rangenumber – це варіант, який визначає діапазон, з якого повертається наступний вільний номер файлу. Укажіть 0 (за замовчуванням), щоб повернути номер файлу в діапазоні від 1 до 255 включно. Укажіть число 1, яке повертає номер файлу в діапазоні від 256 до 511.

Примітки

Скористайтеся функцією FreeFile , щоб надати номер файлу, який ще не використовується.

Приклад

Примітка.: У прикладах нижче показано використання цієї функції в модулі Visual Basic for Applications (VBA). Щоб отримати докладні відомості про використання модуля VBA, клацніть пункт Довідник розробника в розкривному списку поряд із полем Пошук і введіть у поле пошуку принаймні один термін.

У цьому прикладі використано функцію FreeFile , щоб повернути наступний доступний номер файлу. Для виводу в циклі відкриваються п'ять файлів, а деякі зразки даних – для кожного з них.

Dim MyIndex, FileNumberFor 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 #FileNumberNext MyIndex

Потрібна додаткова довідка?

Потрібні додаткові параметри?

Ознайомтеся з перевагами передплати, перегляньте навчальні курси, дізнайтесь, як захистити свій пристрій тощо.

Спільноти допомагають ставити запитання й відповідати на них, надавати відгуки та дізнаватися думки висококваліфікованих експертів.