Примітка.
Функція, метод, об’єкт або властивість, описана в цьому розділі, недоступна, якщо Microsoft Jet Expression Service працює в режимі ізольованого програмного середовища, що запобігає обчисленню потенційно небезпечних виразів. Щоб отримати докладні відомості про режим ізольованого програмного середовища, у вікні довідки шукайте за запитом "режим ізольованого програмного середовища".
Повертає рядок, який містить символи з файлу , відкритого у вхідному або двійковому режимі.
Синтаксис
Input(число, [# ] номер_файлу)
Синтаксис функції Input має такі аргументи:
| Аргумент | Опис |
|---|---|
| Кількість | — обов’язковий аргумент. Будь-який дійсний числовий вираз, що визначає кількість символів, які потрібно повернути. |
| номер файлу | — обов’язковий аргумент. Будь-який дійсний номер файлу. |
Примітки
Дані, зчитані за допомогою функції Input , зазвичай записуються у файл за допомогою 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 MyChar
Open "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.
Loop
Close #1 ' Close file.