Модуль
Зміст
Покажчик 🔎︎

# Функція Input [VBA]

Повертає знаки прочитані з файлу в режимі Input або Binary (String).

Ця функція або константа доступна, якщо у модулі перед кодом виконуваної програми помістити вираз Option VBASupport 1.

## Синтаксис:

            Input( Number as Integer, [# ] FileNumber as Integer)

## Повертає значення:

String

## Параметри:

Число: обов'язково. Числовий вираз, що задає число знаків, які слід повернути.

#: не обов'язково.

НомерФайлу: обов'язково. Будь-який правильний номер файлу.

## Коди помилок:

6 Переповнення

52 Неправильне ім'я або номер файлу

62 Читання вийшло за мітку кінця файлу

## Приклад:

            REM ***** BASIC *****
            Option VBASupport 1
            Sub Example_Input
             Dim MyData
             Open "MyDataFile.txt" For Input As #1
             Do While Not EOF(1)
              MyData = Input(1, #1)
              Print MyData
             Loop
             Close #1
            End Sub

Пов'язані теми

Інструкція Input#

Функції вводу/виводу VBA