Урок 8. Испытываем ActiveX в Visual Basic / Библиотека ATL / Visual C++

Visual C++. ATL
Урок 8. Испытываем ActiveX в Visual Basic'е

В качестве испытательного полигона запустите VB, создайте новый проект типа Standard EXE. Далее добавляем на панель элементов наш ActiveX (в контекстном меню для панели элементов выбираем Components, далее ищем в списке Atl1 1.0 Type Library (если не находится, то воспользуйтесь кнопкой Browse)). После перекидываем появившийся на панели элементов наш ActiveX на форму. Добавляем на форму также одну кнопку Command1. В окне кода пишем следующие строчки:

Option Explicit
Private Sub Command1_Click()
  'Увеличиваем num
  FirstATL1.inc
End Sub
Private Sub FirstATL1_Three()
  MsgBox "Событие Three"
End Sub

Запускаем программу (F5), и три раза жмем на кнопку. При первых двух щелчках ничего не происходит, при третьем (когда num увеличится до трех), выскочит messagebox:

Таким образом мы создали элемент ActiveX с помощью ATL, и у него есть и свойства, и методы, и события. Есть, правда, и недостатки. В частности, свойства не сохраняются (попробуйте, например, изменить свойство num). Но об этом - в последующих уроках.