Индексы элементов управления

[Algon]

Господа, помогите разобраться.

Есть набор элементов управления

Private Sub ToggleButton1_Click()
' код для выполнения
end Sub
Private Sub ToggleButton2_Click()
End Sub

Private Sub ToggleButton3_Click()
и так далее....

В коде для расчета используется номер этой самой кнопки (1, 2, 3, ... соответственно)
Какой переменной и с каким синтаксисом ввести в код этот номер.
Пробовал с Index - ругается.
Версия VB 6.3.

В принципе код во всех одинаковый. Хотел заменит макросом.
Что-то типа

Private Sub ToggleButton1_Click()
application.run "МойМакрос" 
end Sub

Тоже не получается разобраться с синтаксисом. как в него аргумент заслать (номер кнопки)

Буду премног благодарен.

 

[Gamlet]

если сделать их элементами массива управления, то и код должен будет быть одинаковый, это как я понимаю-не походит.