Основы офисного программирования и язык VBA


Окно ввода данных. Функция InputBox - часть 2


Запрос имени пользователя: Имя = InputBox("Здравствуйте! Как Вас зовут?", "Знакомство", _ "Владимир Биллиг",,, "My.hlp", 12) MsgBox Имя & ", рады Вам помочь.", vbExclamation, "Проверка ввода" End If End Sub

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

Окно для ввода даты

Рис. 12.5.  Окно для ввода даты

Окно для ввода имени

Рис. 12.6.  Окно для ввода имени

Окно приветствия

Рис. 12.7.  Окно приветствия




Начало  Назад  Вперед