LEADERSOFT.ru Разработка на заказ программ и сайтов
Форумы по информационным технологиям
 
Регистрация  |  Вход
left
Форумы Минимизировать
ПоискСписок форумов
  Программирование  Microsoft Access. Файлы mdb и accdb  Тема: WithEvent...
 Тема: WithEvents в Access97
 
 15.06.2007 19:52:41
Lulu1
9 сообщения


Тема: WithEvents в Access97
Создала ComboBox в меню. Код такой:
Private WithEvents ComboBoxEvent As Office.CommandBarComboBox

Public Sub SyncBox(box As Office.CommandBarComboBox)
Set ComboBoxEvent = box
End Sub

Private Sub Class_Terminate()
Set ComboBoxEvent = Nothing
End Sub

Private Sub ComboBoxEvent_Change(ByVal Ctrl As Office.CommandBarComboBox)
...
End Sub
В officeXP все работало. А надо под 97. Не работает. Ругается при присвоении: Set ComboBoxEvent = box следующими словами:
"Class doesn't support Automation".



P.S. Создание меню
Автор: Lulu от 05.10.2001 18:41:21 Источник ...
  Программирование  Microsoft Access. Файлы mdb и accdb  Тема: WithEvent...
ПоискПоиск  Список форумовСписок форумов  
right