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

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

Повертає рядок, що містить символи з файлу, відкритого в режимі вводу або двійковому режимі.

Синтаксис

Input( number; [# ] filenumber)

Синтаксис функції Input має такі аргументи:

Аргумент

Опис

number

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

номер файлу

— обов’язковий аргумент. Будь-які припустимі номер файлу.

Примітки

Дані, які читаються за допомогою функції вводу , зазвичай записують у файл із параметром Print # або Put. Використовуйте цю функцію лише з файлами, відкритими в режимі вводу або двійковому режимі.

На відміну від інструкції Input # функція Input повертає всі символи, які вона читає, включно з комами, поверненням каретки, рядками, лапками та пробілами на початку.

Якщо файли відкрито для двійкового доступу, спроба прочитати файл за допомогою функції Input , доки функція EOF не поверне значення True , не створить помилку. Використовуйте функції LOF і Loc замість EOF під час читання двійкових файлів за допомогою функції Input або використовуйте функцію Get під час використання функції EOF .

Примітка.:  Використовуйте функцію InputB для байтних даних, які містяться в текстових файлах. За допомогою функції InputBчисло визначає кількість байтів, які потрібно повернути, а не кількість символів, які потрібно повернути.

Приклад

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

У цьому прикладі функцію Input використано, щоб читати по одному символу з файлу та друкувати його у вікні immediate . У цьому прикладі припускається, що TESTFILE – це текстовий файл із кількома рядками зразків даних.

Dim MyCharOpen "TESTFILE" For Input As #1    ' Open file.Do While Not EOF(1)    ' Loop until end of file.    MyChar = Input(1, #1)    ' Get one character.    Debug.Print MyChar  ' Print to the Immediate window.LoopClose #1    ' Close file.

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

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

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

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