Функция InputBox

Функции ввода/вывода одни из наиболее важных функций в любой системе программирования. Какие бы сложные алгоритмы ни реализовывались на языке Visual Basic, если нет эффективного доступа к данным кода, программа будет не очень полезной.

Ранее мы уже рассматривали функцию вывода данных MsgBox. В этом разделе мы рассмотрим функцию ввода данных InputBox. Функции ввода/вывода данных в(из) файлы(ов) приведены в Приложении В (как и все другие функции).

Функция InputBox является наиболее часто используемой функцией для ввода данных пользователем и имеет следующий синтаксис:

Синтаксис

Inputbox(Prompt [, Title ] [, Default ] [, XP os ][, Ypos ]
[, HelpFile, COntext ])

Prompt — это любое строковое выражение. Аргумент Prompt является единственным обязательным аргументом для InputBox; все другие — необязательные.

Title — это строка, используемая в качестве заголовка для окна ввода (как и для функции MsgBox).

Default также является любым строковым выражением и используется как значение по умолчанию для пользовательского ввода. Следующий оператор, например, запрашивает пользователя ввести имя файла и предлагает имя NEWFILE в качестве значения по умолчанию.

User_Input = InputBox("Введите имя файла: ", _

"Создать файл", "NEWFILE")

По умолчанию диалоговое окно InputBox отображается в центре экрана. Можно выводить это окно в другом месте на экране, особенно, если необходимо, чтобы были открыты и оставались видимыми другие диалоговые окна. Аргументы XPos и YPos могут быть любыми численными выражениями. Эти аргументы позволяют указать, в какой части активного окна появляется окно ввода, и являются координатами верхнего левого угла диалогового окна: XPos — горизонтальное расстояние от левого края окна; YPos — это вертикальное расстояние от верхнего края окна. Оба расстояния измеряются в твипах (twips); один твип равен 1/20 точки (точка — это измерение шрифта печати). Поскольку точка составляет 1/72 часть дюйма, то один твип приблизительно равен 0,0007 дюйма.

Будьте внимательны при задании положения диалогового окна InputBox. Вы можете задать позиции для аргументов XPos и YPos настолько большими, что диалоговое окно совсем не появится на экране, потому что оно выйдет за правый или нижний край окна. При этом, хотя диалоговое окно и невидимо, оно является активным, ни один из элементов управления, которые вы видите на экране, не будет работать до тех пор, пока вы не отреагируете на «невидимое» диалоговое окно.

Последние два необязательных аргумента для функции InputBox — это HelpFile и Context. Они имеют то же назначение, что и подобные аргументы функции MsgBox.

Если вы задаете HelpFile или Context, необходимо задавать оба аргумента (в синтаксической форме эти аргументы заключены в одни квадратные скобки). Всякий раз, когда указывается справочный файл для окна ввода, к окну функции InputBox автоматически добавляется командная кнопка помощи. Среда Visual Basic не включает Windows Help Compiler; если вы хотите создать собственные пользовательские справочные файлы, необходимо в Microsoft получить Windows Help Compiler отдельно или использовать средства независимых поставщиков программного обеспечения.

При вызове InputBox можно использовать именованные аргументы. Для этого просто применяйте имена аргументов: Prompt, Title, Default, XPos, YPos, HelpFile и Context. Следующий оператор выдает такое же диалоговое окно (рис. 6.13), что и ранее приведенный, но здесь применяются именованные аргументы:

User_Input = InputBox(Prompt:="Введите имя нового файла: ", _
Title:="Создать файл", Default:="NEWFILE")

Рис. 6.13

Диалоговое окно функции InputBox.

Обратите внимание, что этот оператор имеет круглые скобки вокруг списка аргументов. Необходимо всегда заключать список аргументов в круглые скобки при использовании результата функции, независимо от того, используете ли вы именованные аргументы при вызове функции.

Нельзя смешивать именованные аргументы с обычным списком аргументов в одном и том же вызове функции. Необходимо использовать либо именованные аргументы, либо список обычных аргументов для каждого отдельного вызова функции.

[1] Во многих, особенно переводных изданиях, вместо этого термина используется термин «оператор». Чаще всего это связано с тем, что в источниках на английском языке (откуда и черпаются основные знания о системах программирования) используются два термина «statement» и «operator» с одним и тем же переводом — «оператор». При этом не всегда учитывается или поясняется тот факт, что «statement» в любом языке программирования означает некоторое законченное предложение, например, оператор присваивания или оператор перехода по условию. Термин «operator» используется для обозначения некоторой операции объединения группы переменных, констант или функций, дающих в результате также переменные, например, операции +, /, & и так далее. Чтобы у читателя не возникало путаницы, в данной книге для объединения данных будут использоваться термины «операция» и «знак операции».

[2] Строки пронумерованы только в книге, в коде Visual Basic строки не нумеруются.