C++ C++ C# C# ASP.NET Security ASP.NET Security ASM ASM Скачать Скачать Поиск Поиск Хостинг Хостинг  
  Программа для работы с LPT портом...
Язык: .NET — ©Alexey...
  "ASP.NET Atlas" – AJAX в исполнении Micro...
Язык: .NET — ©legigor@mail.ru...
  "Невытесняющая" Многопоточность...
Язык: C/C++ — ©...
  01.05.2010 — Update World C++: Сборник GPL QT исходников
  15.12.2007 — Весь сайт целиком можно загрузить по ссылкам из раздела Скачать
Хостинг:
Windows 2003, ASP.NET 2.0
бесплатный и от 80 руб./мес


   Отправить письмо
Кулабухов Артем, Беларусь




 4 - Проверяем ActiveX / ActiveX по шагам / Приложение

Шаг 4 - Проверяем ActiveX

Проверять мы будем его с использованием VBA и Excel. Если представления о VBA у Вас нет никакого, а у многих его нет из принципа :-).

Итак, открываем Excel и создаем макрос с именем MyMacro. Переходим в редактор VBA. Там надо создать пользовательскую форму. Правой кнопкой на Microsoft Excel, объекты в окне Проект. И пукт меню Add User Form.

После этого на панель элементов надо поместить наш элемент. Правой кнопкой на пустом месте в "Элементы управления" и пункт меню "дополнительные элементы". Там в списке будет наш элемент. Квадратик против него надо выделить галочкой.

4_1.gif (2512 b)

После этого он появится на панели. Вы его узнаете, на нем будет написано OCX и всё. Но это в следующих шагах поменяем. Возмите его и поместите на диалоговое окно. Вы должны увидеть белый квадрат, а внутри него строку:

MyActiveX 2

Если помните это начальная инициализация. А вот в окне Свойства DMyActive1 появилось наше свойство.

4_2.gif (3798 b)

Поменяйте его на - Привет :-). Закройте форму. И измените код макроса.

Sub MyMacro()
	UserForm1.Show
End Sub

Запустите его. Там будет привет. Но это еще не все. Опять поменяйте код макроса:

Sub MyMacro()
	UserForm1.DMyActive11.MyText = "God Active"
	UserForm1.Show
End Sub

И опять запустите. Всё работает как часы. Опять меняем код для интереса:

Sub MyMacro()
	MsgBox (UserForm1.DMyActive11.MyText)
End Sub

Вы должны увидеть - "Привет".

Закройте редактор VBA сохраните книгу под любым именем. Выйдите из Excel. Запустите его снова. Откройте книгу. Зайдите в редактор VBA и снова посмотрите свойство DMyActive11 на форме. Оно осталось неизменным, несмотря на все операции. Ведь не зря же мы описали функции DoPropExchange() для обмена с контейнером.

Не знаю какие эмоции данный факт вызывает у Вас, а по мне круто. Он работает как настощий элемент. Хотя пока много непонятного. Но всё равно, Работает !!!


| |
Автор Каев Артем.
[AD]