1. Расположите на форме одну командную кнопку (рис.5.1).
Рис.5.1
2. Установите значения свойства Name для формы и кнопки такие, как показано ниже в программном коде.
3. Наберите программный код проекта. Самостоятельно заполните пропуски (...):
Private sub cmdПриветствие_Click()
Dim YourName As String
YourName=InputBox("Bведите свое имя", "Имя") 'Присваивание переменной YourName
'значения введенного пользователем
'с помощью окна InputBox (рис. 5.2)
cmdПриветствие.Visible = False 'Кнопка становится невидимой
With frmПриветствие
………………………….'Самостоятельно установите тип, размер, начертание и цвет шрифта,
'которым сообщение будет печататься на форме
End With
…………………………. 'Используя метод Print и функции Spc и Tab, добейтесь,
'чтобы сообщение на Форме выглядело как на рис. 5.3