Стратегічна модель Портера

Дата добавления: 2014-12-06; просмотров: 748

Рассмотрим способ вывода информации не в документ Word, а в стандартное диалоговое окно. Данный способ можно осуществить только средствами VBA.

1. измените текст макроса следующим образом:

Sub Макрос1()

MsgBox (“Мое первое сообщение”)

debug.print “Мое первое сообщение”

End Sub

Краткие пояснения:

MsgBox (“Мое первое сообщение”)- это вызов стандартного диалога для сообщения;

debug.print “Мое первое сообщение” – этот оператор выводит текст в окно отладки, которое располагается ниже окна редактора VBA.

2. запустите макрос и убедитесь в правильности его работы.

3. обратитесь к справочной системе VBA для изучения особенностей работы стандартного диалога сообщений. Для этого, в редакторе VBA выделите имя функции MsgBox и нажмите F1. Появится окно справки, в котором можно ознакомиться с параметрами вызова этой функции.

Стандартный диалог сообщений имеет развитые средства взаимодействия с пользователем. Ее синтаксис следующий:

Response=MsgBox (prompt,buttons,title).

При запуске этой функции можно задать имя окна (title), само сообщение (prompt) и оформление окна (buttons), а также есть возможность определить какую кнопку нажал пользователь при закрытии этого окна (Response). Только параметр prompt является обязательным, остальные параметры - необязательные и их можно опускать. Оформление окна можно задавать следующими константами:

Возвращаемый параметр Response в зависимости от нажатой пользователем клавиши может принимать следующие значения:

Вышеописанный диалог полезно использовать для получения пользователя различных сведений, например о том, следует ли удалять файл с жесткого диска или удалять записи из базы данных, или подтверждение о сохранении файла под новым именем и т.д.