Основы VBA. Часть 11

Программирование помощника.

Прежде всего при программировании помощника необходимо задать требуемый персонаж, а затем его поведение.

Создание объекта Assistant.

Программирование помощника осуществляется с помощью объекта Assistant, который также позволяет обратиться к объектам Balloon, содержащим список разделов справки. Например, чтобы присвоить объектной переменной ссылку на объект Assistant:
Dim myassistant As Assistant
Set myassistant = Assistant

Выбор помощника.

Для выбора помощника используется свойство FileName объекта Assistant. Например, процедура выбора летающей тарелки:
Public Sub specassistant()
Dim myassistant As Assistant
Set myassistant = Assistant
myassistant.FileName = «c:\program files\microsoft office\office\actors\Hoverbot.act»
End Sub
В один момент времени можно вывести только одного помощника. Тем не менее имеется возможность изменить помощника в любое время, например, можно использовать первого помощника, чтобы вывести один набор советов, а затем второго,- чтобы отобразить другой набор.
Файл помощника — это файл, содержащий внешний вид помощника, а также описание всех его движений на экране. Файлы помощника обычно находятся в папке\program files\microsoft office\office\actors. Существуют следующие помощники: Ученый (Genius.act), Пес-барбос(Powerpup.act), Скрепыш(Clippit.act) и др. Помощник Скрепыш(Clippit.act) используется по умолчанию.

Управление движениями помощника.

Программа может управлять движениями помощника на экране. Для оживления помощника используется свойство Animation. Значение этого свойства задает один из тридцати четырех анимационных эффектов. Например, следующая программа выводит начинающего говорить Скрепыша:
With Assistant
.Visible = True
.Sounds = True
.Animation = msoAnimationBeginSpeaking
End With