|
Занятие 22.2. Функция вывода сообщений Msgbox.
Использование значения функции при реализации выбора в проектах.
Функция вывода сообщений Msgbox() позволяет выводить сообщения с помощью окна сообщений, в котором можно разместить определенны набор кнопок и информационный значок о типе сообщения:
Msgbox("Сообщение", Числовой Код информационного значка + Числовой Код определенной кнопки, "Заголовок окна"),
где Числовой Код информационного значка + Числовой Код определенной кнопки определяется с помощью таблицы значений кодов:
Пример:
MsgBox("проверка" , 64 + 4, "использование MsgBox при организации ветвления")
Но так как Msgbox - функция, то правильнее будет использовать ее так:
-
- завести для нее целую переменную, и присвоить ей значение функции Msgbox;
- значение функции Msgbox - это код нажатой кнопки в окне сообщения, значение которого можно найти в таблице кодов кнопок.
Таблица кодов кнопок:
Рассмотрим тему занятия на примере создания проекта.(материал Интернет)
Алгоритм проекта.
Программный код проекта.
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim kod As Short
kod = MsgBox("проверка", 64 + 4, "использование MsgBox при организации ветвления") ' переменной kod присваивается код нажатой кнопки в окне сообщения
If kod = 6 Then MsgBox("Нажата кнопка 'Да'", , "результат выбора") : Label1.Text = "Нажата кнопка 'Да' "
If kod = 7 Then MsgBox("Нажата кнопка 'Нет'", , "результат выбора") : Label1.Text = "Нажата кнопка 'Нет' "
End Sub
Занятие 23
| |
