Цепочка связанных объектов COM

В большинстве примеров, рассмотренных нами, в качестве OLE-клиента использовалось приложение Visual Basic, но с этой ролью в полнее может справиться любое офисное приложение. В качестве же OLE-сервер а могут выступать MS Excel, Word, Access и др., поскольку в них имеется окно VBA. Однако связь OLE-клиента с OLE-сервером не всегда может быть прямой. Эту связь можно расширить засчет введения дополнительных(транзитных) OLE-клиент-серверов, тем самым организовав цепочку связанных объектов COM.

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

Приложение FrontPage предназначено для создания Web-сайтов и так же, как все офисные приложения, обладает своей объектной моделью. Чтобы реализовать работу подобной цепочки объектов COM, необходимо управлять работой приложения FrontPage или Word (в нашем случае это запуск созданных в них макросов) с помощью метода Run объекта Application этих приложений. Синтаксис этого метода следующий:

Run (<Имя Макроса>[,<Список_параметров_макроса>])

Где Имя Макроса–имя процедуры или функции, записанной в окне Редактора Visual Basic;

Список_параметров_макроса–это параметры макроса(до30), указанные через запятую. Параметры у макроса могут отсутствовать.

•Создадим новый проект VB и разместим на форме две кнопки, два текстовых поля и две метки, как на рисунке.

61. Пример создания «на лету» программного кода макроса, определяющего полный путь к библиотеке типов и ClassID библиотеки. Программные способы добавления модуля класса, модуля формы и исходного модуля.

Пример. Продемонстрировать возможность создания и запуск а на выполнения макроса, созданного в программе VB.

•Сформируйте внешний вид формы, состоящий из двух кнопок и трех списков Combo, как на рисунке ниже.

•В режиме конструктора измените свойство FontуCombo1 на жирный с размером 10 и подпишите все кнопки.

•В окне Code формы введите следующую программу.