Открывается стандартный ввод (
stdin) и стандартный поток определения
ошибок (
stderr) для файловых операций.
Синтаксис
Использование
Open Err [for mode] as [#]filenum
или
result = Open Err( [for mode] as [#]filenum )
Параметры
mode
Игнорируется.
filenum
Неиспользуемый(свободный) номер файла.
Возвращаемое значение
Ноль возвращается, если Open Err успешно завершено, в
противном случае ненулевое значение возвращается, указывающее на ошибку.
Описание
Эта команда открывает
stdin для чтения и
stderr для записи
в консоль, позволяя операции чтения и записи с привычными файловыми
командами.
stderr выходной поток отличается от
stdout . Сообщения об
ошибке будет перенаправлено отдельно от главной консоли вывода.
Привычные консольные команды, такие как
Color
и
Locate, не работают в этом режиме,
потому что они не принимают номер файла.
[For Input|Output] mode допускается для
совместимости, но игнорируется.
Runtime ошибки:
Open Err создает одну из следующих
runtime ошибок:
(1) Illegal function call
- Filenumber не является свободным. Используйте FreeFile
для того, чтобы найти свободный filenumber.
Пример
Dim a As String
Open Err For Input As #1
Print #1,"Please write something and press ENTER"
Line Input #1, a
Print #1, "You wrote"; a
Close
Sleep
Отличия от QB
См. также