Функция вывода
• MsgBox(Сообщение$[,ЧисКод1+ЧисКод2][,Заголовок$])
Пиктограмма
?
!
i
ЧисКод1
16
32
48
64
Стр. 195
ЧисКод2 Набор кнопок
0 ОК
1 Ок, Отмена
2 Стоп, повтор,
пропустить
3 Да, нет,
отмена
4 Да, нет
5 Повтор,
отмена
Проект «Проверка знаний»
Примеры
Private Sub Command1_Click()
strC = InputBox("Введите Вашу фамилию", "Регистрация")
bytB = MsgBox("Уважаемый " + strC + ",Вы готовы к проверке знаний?",
33
End Sub
, "Приветствие")
Проект «Проверка знаний»
Пример 2
•
•
•
•
Private Sub Command1_Click()
strC = InputBox("Введите Вашу фамилию", "Регистрация")
bytB = MsgBox("Уважаемый " + strC + ",Вы готовы к проверке знаний?",
35
End Sub
, "Приветствие")
Проект «Проверка знаний»
Пример 3
•
•
•
•
Private Sub Command1_Click()
strC = InputBox("Введите Вашу фамилию", "Регистрация")
bytB = MsgBox("Уважаемый " + strC + ",Вы готовы к проверке знаний?", ,
"Приветствие")
End Sub
36
Проект «Проверка знаний»
Пример 4
•
•
•
•
Private Sub Command1_Click()
strC = InputBox("Введите Вашу фамилию", "Регистрация")
53
bytB = MsgBox("Уважаемый " + strC + ",Вы готовы к проверке знаний?", ,
"Приветствие")
End Sub
Проект «Проверка знаний»
Проект № 8 по учебнику §4.9.4
стр. 194
Дома: прочитать § 4.9.4 и выполнить
задание №4.19 в тетради или на
компьютере.
Материалы на данной страницы взяты из открытых истончиков либо размещены пользователем в соответствии с договором-офертой сайта. Вы можете сообщить о нарушении.