Управляем действиями помощника

 

Программирование действий помощника

____Чтобы узнать имя помощника, используйте свойство Name

Public Sub имя_помошника( )
Dim MyAssistant As Assistant
Set MyAssistant = Assistant
MyAssistant.Filename = "C:\Program Files\Microsoft Office\Office10\Clippit.acs"
Debug.Print MyAssistant.Name
End Sub

____С помощью этой маленькой программки я узнал имена всех помощников, которые установлены на моем компьютере, для этого нужно будет только менять в программе значение выделенное красным цветом. Попробуйте и вы.

файл
имя
Logo.acs
Эмблема Office
Poverpup.acs
Пес – барбос
Genius.acs
Ученый
Hoverbot.acs
Летающая тарелка
Scrible.acs
Лоскуток
Dot.acs
Колобок
Clippit.acs
Скрепыш
MNature.acs
Планета Земля
и так далее

Предупреждение: Если у вас установлен Microsoft Office – 97, то расширение файлов помощника будет .act. В этом случае попытка выполнить ваш код:

MyAssistant.Filename = "C:\Program Files\Microsoft Office\Office10\Clippit.acs"

Приведет к возникновению ошибки. Чтобы этого не произошло, вам необходимо будет изменить расширение с .acs на .act и, он должен будет стать таким:

MyAssistant.Filename = "C:\Program Files\Microsoft Office\Office10\Clippit.act"

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

 

Программа может управлять движением помощника на экране. Для оживления помощника используется свойство Animation. Значение этого свойства задает какое-либо действие. Например, следующая программа задает думающего скрепыша:

Public Sub работа_скрепки( )
Dim MyAssistant As Assistant
Set MyAssistant = Assistant
MyAssistant.Filename = "C:\Program Files\Microsoft Office\Office10\Clippit.acs"
MyAssistant.Animation = msoAnimationThinking
End Sub

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

: продолжение :

РАБОТАЕМ С
ПОМОЩНИКОМ

Учимся искать помощников, установленных на жестком диске компьютера

Программируя помощника с помощью VBA, например, можно...

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

Как осуществить выбор программируемого в макросах помощника...

Как запрограммировать то или иное действие помощника в макросах...

Перечень всех тех команд, которые может выполнять наш Скрепыш...

Задаем поведение Скрепыша свойствами...

Задаем содержимое списка разделов справки и запускаем его..

Задание содержимого окна помощника..

Изменение интерфейса окна помощника...

 
Рейтинг@Mail.ru
 главная с чего начать готовые программы задачи с решениями карта
Copyright © СОМИТ, А.Козлов, 2005 г