Презентация на тему: Встроенные диалоговые окна InputBox и MsgBox

Тема: Встроенные диалоговые окна: InputBox, MsgBox МДК 01.02. «Прикладное программирование» Преподаватель: Белова Н. А.

1. Виды диалоговых окон Модальное диалоговое окно Немодальное диалоговое окно

2. Функция InputBox

Синтаксис

Пример

Title Prompt Xpos Ypos Default Helpfile,context

3. Процедура MsgBox

Синтаксис MsgBox Prompt [, Buttons] [, Title] [, Helpfile, сontext] MsgBox "Изучаем VBA!", vbExclamation + vbOKOnly, "Пример окна вывода"

Title Prompt Buttons

Параметр Buttons Константа Значение Значок сообщения vbCritical 16 vbQuestion 32 vbExclamation 48 vbInformation 64

Константа Значение Нажатая кнопка VbOK 1 OK VbCancel 2 Отмена (Cancel) VbAbort 3 Прервать (Abort) VbRetry 4 Повторить (Retry) VbIgnore 5 Пропустить (Ignore) VbYes 6 Да (Yes) VbNo 7 Нет (No)

Dim Ответ As Integer Ответ = MsgBox("Завершить работу?", vbYesNo + vbQuestion, "Пример") If Ответ = vbYes Then MsgBox "Спасибо за внимание!", vbExclamation Application.Quit Else MsgBox "Выход отменен.", vbInformation + vbOKOnly, "Отмена выхода" End If