Visual Basic, .NET, ASP, VBA, VBScript
 
  Справочники  
  Справочник по Windows API Справочник по Visual Basic  
     
  Функция Input  
 

Функция

Input

Синтаксис

Input(number, [#]filenumber)
Input$(number, [#]filenumber)
InputB(number, [#]filenumber)
InputB$(number, [#]filenumber)

Функция считывает символы из файла, открытого для последовательного доступа или как двоичный файл.

Параметры

Наименование

Описание

Number

Обязательный. Любое числовое выражение, указывающее число возвращаемых символов или байтов

FileNumber

Обязательный. Любой допустимый номер файла

Замечания

Данные, считываемые с помощью функции Input, обычно записываются в файл с использованием оператора Print # или Put. Эта функция применима только к файлам, открытым в режиме Input или Binary. В отличие от оператора Input #, функция Input возвращает все считанные символы, в том числе запятые, символы возврата каретки, символы перевода строки, кавычки и начальные пробелы.
Для файлов, открытых для доступа в режиме Binary, попытка чтения файла с помощью функции Input при возвращении функцией EOF значения True, приводит к ошибке. При чтении двоичных файлов с помощью функции Input следует вместо функции EOF использовать функции LOF и Loc или применять с функцией EOF оператор Get. Для байтовых данных, содержащихся в текстовых файлах, пользуйтесь функцией InputB. В этом случае параметр Number указывает число байт (а не символов), которые следует вернуть.

Пример использования

'в примере функция Input используется для считывания
'данных из файла, предполагается, что MYFILE является
'текстовым файлом, который содержит несколько строк текста

Dim InputData
'открываем файл для чтения под номером 1
Open "MYFILE" For Input As #1
Do While Not EOF(1) 'проверяем не достигнут ли конец файла
  InputData = Input (1, #1) 'читаем данные
  Debug.Print InputData 'выводим данные в окно отладки
Loop
Close #1 'закрываем файл

Дополнительная информация

Категория: Работа с файловой системой

Еще функции: CurDir, Dir, EOF, FileAttr, FileDateTime, FileLen, FreeFile, GetAttr, Input, Loc, LOF, Seek

 
     
  VBNet online (всего: 52050)  
 

Логин:

Пароль:

Регистрация, забыли пароль?


В чате сейчас человек
 
     
  VBNet рекомендует  
   
     
  Лучшие материалы  
 
ActiveX контролы (112)
Hitman74_Library (36119)
WindowsXPControls (20739)
FlexGridPlus (19374)
DSMAniGifControl (18295)
FreeButton (15157)
Примеры кода (546)
Parol (18027)
Passworder (9299)
Screen saver (7654)
Kerish AI (5817)
Folder_L (5768)
Статьи по VB (136)
Мое второе впечатление... (11236)
VB .NET: дорога в будущее (11161)
Основы SQL (9225)
Сообщения Windows в Vi... (8788)
Классовая теория прогр... (8619)
 
     
Техническая поддержка MTW-хостинг | © Copyright 2002-2011 VBNet.RU | Пишите нам