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