1. Измените программный код проекта следующим образом:
Private Sub CmdПриветствие_Click()
Dim YourName As String
Dim t As String
YourName = InputBox("Введите свое имя", "Имя")
CmdПриветствие.Visible = False
t = 0 + 64 'Кнопка ОК и пиктограмма Информация
MsgBox "Здравствуйте " +YourName+ "! Рады приветствовать Вас в нашем проекте!", t, "Привет!!!"