Допомога у написанні освітніх робіт...
Допоможемо швидко та з гарантією якості!

Створення OLE-об"єктів

Лабораторна роботаДопомога в написанніДізнатися вартістьмоєї роботи

Структуроване сховище даних; Звільнюємо об'єктну змінну. Set ExcelSheet = CreateObject («Excel.Sheet»). Лабораторна робота № 3. Макрос створений 29.12.98. ExcelSheet.Application.Visible = True. Теоретична частина. Описуємо змінну. Автоматизація; ExcelSheet.Application.Quit. Текст макросу. Dim ExcelSheet As Object. Set ExcelSheet = Nothing. Формировка"; RunOle Макрос. Інтерфейс. Об'єкти; Sub… Читати ще >

Створення OLE-об"єктів (реферат, курсова, диплом, контрольна)

Лабораторна робота № 3

Тема: « Створення OLE-об'єктів »

Виконали: студенти Коваленко І.А. Поздняков Р.О.

Перевірив: викладач Смірнов В.В.

План

Теоретична частина Текст макросу

Теоретична частина

OLE (Object Linking and Embedding) — зв’язування та запровадження об'єктів.

OLE в якості будівельних блоків використовує велику кількість об'єктів. OLE містить нові об'єкти для реалізації наступних концепцій :

«Формировка» ;

Структуроване сховище даних ;

Ярлик ;

Автоматизація ;

Об'єкти ;

Інтерфейс.

OLE дозволяє об'єкту-клієнту з'єднуватися з об'єктом-сервером. З'єднання можливо здійснити зв’язуванням об'єктів (дані поза складового документа) або запровадження об'єктів (дані в середині складового документа).

Зв’язані дані можуть зберігатися поза файлом, який належить до OLE або у структурованому сховищі даних.

Складовий документ — спеціальний випадок структурованого сховища, для зберігання об'єктів в контейнерах прикладних програм.

OLE автоматизація — набір інтерфейсів, які дозволяють використовувати прикладні програми в якості OLE-об'єктів.

Уніфікована передача даних — набір інтерфейсів, які дозволяють клієнту та серверу обмінюватися даними.

інтерфейс прикладний сервер клієнт

Текст макросу

Sub RunOle ()

'' RunOle Макрос

' Макрос створений 29.12.98

'Описуємо змінну

Dim ExcelSheet As Object

'Створюємо вказаний об'єкт та повертає на нього зсилку

Set ExcelSheet = CreateObject («Excel.Sheet»)

' Робимо Excel видимим через об'єкт Application.

ExcelSheet.Application.Visible = True

' Поміщаємо текст в першу ячейку електронної таблиці.

ExcelSheet.Cells (1, 1).Value = «Це таблиця Exel, визвана із Word»

' Закриваємо Excel, визиваємо метод Quit об'єкту Application.

ExcelSheet.Application.Quit

' Звільнюємо об'єктну змінну.

Set ExcelSheet = Nothing

End Sub

Показати весь текст
Заповнити форму поточною роботою