End Sub
Диалоговое окно ввода информации InputBox
Системные диалоговые окна
В VB имеются специальный вид окон – диалоговый, которые бывают двух типов. Модальное диалоговое окно – это окно, из которого нельзя перейти в другое окно, не закрыв его. Оно вынуждает пользователя совершить некоторые действия. Немодальное диалоговое окно позволяет переместить фокус в другое окно без его закрытия.
В VB существует следующие стандартные диалоговые окна:
- «Открытие файла» для поиска нужного файла;
- «Сохранить как» для поиска места хранения файла и ввода его имени;
- «Печать» для настройки режима печати
- «Цвет» для выбора цветовой палитры;
- «Шрифт» для выбора и установки шрифта;
Кроме того, имеются диалоговые окна сообщений MsgBox и окна, предназначенные для ввода информации InputBox, которые не требуют проектирования, а вызываются из программы специальными функциями.
Достаточно часто в диалоговом окне требуется ввести информацию, которая затем анализируется программой. Для выполнения такого рода в VB можно использовать окно ввода информации
InputBox. Это окно вызывается из программы с помощью одноименной функции, которая имеет следующий синтаксис:
InputBox(Приглашение,Заголовок,НачЗначение),
где
Приглашение – это любой текст, который должен находиться в окне ввода. Его назначение – служить подсказкой пользователю, какую информацию он должен ввести в специальное поле ввода, находящееся в этом окне.
Заголовок– это надпись в строке заголовка окна ввода.
НачЗначение – это значение, которое будет введено автоматически, если пользователь будет с этим согласен.
Возвращаемым значение данной функции является информация, вводимая пользователем, которой автоматически приписывает тип String. Например, функция InputBox(”Введите s”,”Ввод данных”,””), использованная в событийной процедуре:
Рrivate Sub Command1_Click()
s=InputBox(”Ввод данных”,”Введите s”,””)
Text1.Text= s
вызывает появление диалогового окна