ACCESS 2003-2010. Есть кнопочная форма("КнопочнаяФорма"), а в ней кнопка1. Каждый раз при вызове кнопочной формы из основной, в зависимости от названия основной формы (откуда вызывается кнопочная) нужно организовать вызов программы, находящейся в общем программном модуле. Программы в модуле именуются по принципу "Форма1_НужноеДействие1", "Форма2_НужноеДействие1" и т.д. Как мне передать название процедуры в команду CALL
что-то типа
Private Sub Кнопка1_Click()
' знаем название процедуры (текстовый формат)
Call ??????????

End Sub

Select case можно конечно, но это длинный способ. Делаю универсальную кнопочную форму, при вызове которой из разных рабочих форм формируется перечень от 1 до 20 кнопок и на каждую из кнопок вешается программа для данной рабочей формы. CALLBYNAME подошла бы. Но не пойму как передать параметры в нее. Все эти программы для кнопок логично было бы собрать в одном общем модуле и вызывать программы из него. Глядишь - какие-то подошли бы для нескольких случаев - повышаем reusability. Из справки на функцию CALLBYNAME - первый параметр - объект, для которого выполняется метод. Второй - название вызываемой процедуры, третий в моем случае - vbMethod. Непонятно пока с первым параметром. Из модуля кнопочной формы для Кнопка1 надо вызвать процедуру из общего модуля. Что тут объект? Кнопка, сама кнопочная форма, общий модуль? Пробовал все это подставлять - выдает ошибку 2465 application defined or object.defined error или (если объект - кнопка) 438 Object doesnt support method. Упаковал вызов процедуры из общего модуля в отдельную процедуру в модуле кнопочной формы - не помогло.

Спасибо! У меня в итоге заработало таким способом:
Private Sub Кнопка1_Click()
Dim cl As ПрограммыКнопок ' создал в общих модулях модуль класса с таким именем - в него буду складывать все возможные программы для кнопок
Set cl = New ПрограммыКнопок
CallByName cl, Кнопка1.Tag, VbMethod ' при открытии кнопочной формы из конкретной рабочей формы прописываю в тегах каждой кнопки название программы для нее, сам список кнопок для каждой рабочей формы веду в отдельной таблице, где дана информация по имени кнопки, всплывающей подсказке, вызываемой программе.

End Sub