Порядок действий. 1. Расположите на форме одну командную кнопку (рис.5.1)

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


Понравилась статья? Добавь ее в закладку (CTRL+D) и не забудь поделиться с друзьями:  



double arrow
Сейчас читают про: