End Sub

Диалоговое окно ввода информации InputBox

Системные диалоговые окна

В VB имеются специальный вид окон – диалоговый, которые бывают двух типов. Модальное диалоговое окно – это окно, из которого нельзя перейти в другое окно, не закрыв его. Оно вынуждает пользователя совершить некоторые действия. Немодальное диалоговое окно позволяет переместить фокус в другое окно без его закрытия.

В VB существует следующие стандартные диалоговые окна:

- «Открытие файла» для поиска нужного файла;

- «Сохранить как» для поиска места хранения файла и ввода его имени;

- «Печать» для настройки режима печати

- «Цвет» для выбора цветовой палитры;

- «Шрифт» для выбора и установки шрифта;

Кроме того, имеются диалоговые окна сообщений MsgBox и окна, предназначенные для ввода информации InputBox, которые не требуют проектирования, а вызываются из программы специальными функциями.

Достаточно часто в диалоговом окне требуется ввести информацию, которая затем анализируется программой. Для выполнения такого рода в VB можно использовать окно ввода информации
InputBox. Это окно вызывается из программы с помощью одноименной функции, которая имеет следующий синтаксис:

InputBox(Приглашение,Заголовок,НачЗначение),

где

Приглашение – это любой текст, который должен находиться в окне ввода. Его назначение – служить подсказкой пользователю, какую информацию он должен ввести в специальное поле ввода, находящееся в этом окне.

Заголовок– это надпись в строке заголовка окна ввода.

НачЗначение – это значение, которое будет введено автоматически, если пользователь будет с этим согласен.

Возвращаемым значение данной функции является информация, вводимая пользователем, которой автоматически приписывает тип String. Например, функция InputBox(”Введите s”,”Ввод данных”,””), использованная в событийной процедуре:

Рrivate Sub Command1_Click()

s=InputBox(”Ввод данных”,”Введите s”,””)

Text1.Text= s

вызывает появление диалогового окна